Написать программу в турбо паскаль. найти сумму всех n-значных чисел (1 ≤ n ≤ 4)

bondarenkoadeli bondarenkoadeli    1   07.06.2019 21:50    1

Ответы
RoxXL RoxXL  07.07.2020 12:00
Var n,i:integer;
begin
n:=0;
for i:=1 to 4 do
n:=n+i;
writeln(n);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика