Вопрос школьника по предмету Информатика
Написать программу отсчёта от 10 до 1, завершиться должна словом пуск. Паскаль, цикл while
Ответ учителя по предмету Информатика
// PascalABC.NET 3.2, сборка 1403 от 16.03.2017
begin
var i:=10;
while i>=1 do begin
Writeln(i);
Sleep(1000); // пауза 1с
i:=i-1
end;
Writeln(‘Пуск!’)
end.
Результат
10
9
8
7
6
5
4
3
2
1
Пуск!
Похожие вопросы от пользователей
Мой остров называется Фантазия. Туда можно попасть только в детстве. Каждый ребенок, попав туда, встречает своего любимого сказочного героя, может общаться с ним и даже участвовать в его приключениях и путешествиях. На этом острове добро всегда побеждает зло. Сладости там растут на деревьях. На острове Фантазия дети не ходят в школу и никто никогда не болеет. Погода на острове тёплая и солнечная круглый год.
Подумай, случайно ли Гоголь делает причиной гибели героя обыкновенную люльку(курительную трубку) и как в этом эпизоде проявляется характер Тараса