Ответы
Ответ дал:
0
program oneTO30
var
h:integer;
BEGIN
for int i:=2 to 30 do
h:=h*i;
writeln(h); \или readln ... забыл
END.
var
h:integer;
BEGIN
for int i:=2 to 30 do
h:=h*i;
writeln(h); \или readln ... забыл
END.
Ответ дал:
0
var i: integer; begin for i:= 1 to 30 do writeln(i);end.
Вот код вывода чисел от 1 до 30, либо я не понял вопроса, либо вам дорога не в программирование
Вот код вывода чисел от 1 до 30, либо я не понял вопроса, либо вам дорога не в программирование
Ответ дал:
0
var
i: integer;
begin
for i:= 1 to 30 do
writeln(i);
end.
i: integer;
begin
for i:= 1 to 30 do
writeln(i);
end.
Похожие вопросы
2 года назад
6 лет назад
6 лет назад
9 лет назад