Анонимно

составить программу нахождения суммы 10 четных чисел на Паскале

Ответ

Анонимно
Program P17; Var i, sum: integer; Begin Sum:=0; For i:=1 to 10 do Sum:=sum+i; Writeln('sum = ',sum); End.

Новые вопросы по Информатике