Ввести натуральное число и вывести в строку от 1 до этого числа

Danielllllllll Danielllllllll    1   14.07.2019 13:40    0

Ответы
Che11 Che11  03.10.2020 04:03
Var
 n,i:integer;
begin;
readln(n);
for i:=1 to n do
write(i:4);
end.
ПОКАЗАТЬ ОТВЕТЫ
orlovs2017 orlovs2017  03.10.2020 04:03
Var i,a : Integer;
Begin
  Readln(a);
  For i:=1 to a do Write(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика