Информатика, вопрос задал freyhdddddddddddd , 8 лет назад

Составьте программу на языке паскаля. Даны 10 чисел .Найти сумму чисел , которые не меньше 5.

Ответы на вопрос

Ответил YoungProgrammer
0
Program z1;Var Sum, a, i:integer;BeginSum:=0;5for i:=1 to 10 do begin   read(a);   if (a>=5) then Sum:=Sum+a;   end;writeln(Sum);end.
Предыдущий вопрос
Следующий вопрос
Новые вопросы