Составить прграмму с командой while для решения - вопрос №1882822135731 от YomiTan 06.09.2022 15:08

Question

Информатика: Составить прграмму с командой while для решения : найти сумму 1+3+5+7++31.

YomiTan · Answer

Var x,s:integer;Begin s:=0; x:=1; while x =31 do   begin    s:=s+x;    x:=x+2;   end; writeln( S= ,s);End....