Дано натуральное число N(водиться с клавиатуры). Написать программу, выводящую на экран натуральные числа от 1 до N
Дано натуральное число N(водиться с клавиатуры). Написать программу, выводящую на экран натуральные числа от 1 до N
Гость
Ответ(ы) на вопрос:
ГостьProgram Task;
Var i, N: Integer;
Begin
Write('N = ');
ReadLn(N);
For i := 1 To N Do
Write(i, ' ');
ReadLn;
End.
Не нашли ответ?
Похожие вопросы