Ответ учителя по предмету Информатика
var i,N:integer;
begin
writeln(‘пожалуйста, веедите натуральное число не превосходящее 1000’);
readln(N);
writeln(‘Входное число=’,N);
for i:=0 to (N-1) do write(i,’ ‘);
end.
Пример работы:
пожалуйста, веедите натуральное число не превосходящее 1000
5
Входное число=5
0 1 2 3 4
P.S.Если в условии от 1-го, а не от нуля, for i:=0 to (N-1) do write(i,’ ‘); замени на for i:=1 to (N-1) do write(i,’ ‘);
Лишняя информация, если тебе не нравится информатика: на сколько я понял, ты не мог понять как вывести сначала число 5. В моей программе это делает оператор writeln(N); Именно Writeln, а не Write. Почему? Потому что writeln произошло от слова line — линия, оно занимает целую строку. А Write мастит все в одну строку. Если нужно будет что-то рассказать и это будет в моих силах, я с радостью помогу любому желающему.
Похожие вопросы от пользователей
s=x^3+x^5+x^n, где x и n вводятся с клавиатуры.
Задача: Мыши съели 2/5 головку сыра,вес которой 15 кг. Сколько кг съели мыши.(2/5 это дробь если что)
1. Определите тип этой задачи:
-Нахождение части от числа
-Нахождение числа по его части.
Сравни ответы 6 и ответ той задачи буду очень благодарна если поможете.
15 Баллов))
что было в сказке курочка ряба. Когда мышь разбила яйцо.