Составить прграмму с командой while для решения - вопрос №1357311883047 от kostyuchkova12 23.01.2023 14:40

Question

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

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