Составьте программу на языке паскаля. даны 10 чисел - вопрос №836142010 от Ученик221603 20.08.2021 06:11

Question

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

Ученик221603 · Answer

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....