Предмет: Информатика,
автор: superkostyako
составить программу нахождения суммы 10 четных чисел на Паскале
Ответы
Автор ответа:
0
Program P17;
Var i, sum: integer;
Begin
Sum:=0;
For i:=1 to 10 do
Sum:=sum+i;
Writeln('sum = ',sum);
End.
Похожие вопросы
Предмет: Русский язык,
автор: Аноним
Предмет: Математика,
автор: dianaaaaaaaaaaaaaagm
Предмет: Математика,
автор: laxyuka
Предмет: Литература,
автор: ilyasovanyara0
Предмет: Физика,
автор: Сашка08