Написать программу на языке Паскаль для решения задачки. С помощью цикла
Написать программку на языке Паскаль для решения задачки. С поддержкою цикла с послеусловием напишите программку, которая требует у вас пароль, например, 111. Если пароль верный, то наполняет все строчки экрана известьем Молодец. Если после пятой пробы пароль все одинаково неверен, выходит из программки. Для проверки приготовить код программки и результаты ее работы.
Задать свой вопросКод программы:
(пароль: 105)
program raf105;
const pass = 105;
var enterpass, x:integer;
begin
repeat
write('Введите пароль: ');
readln(enterpass);
if enterpass = pass
then
while 1=1 do
writeln('Молодец')
else x += 1;
until x=5;
end.
Результаты работы программки:
1.
Вывод: Введите пароль:
Ввод: 105
Вывод: Молодец Молодец Молодец Молодец Молодец Молодец Молодец Молодец Молодец...
2.
Вывод: Введите пароль:
Ввод: 123
Вывод: Введите пароль:
Ввод: 106
Вывод: Введите пароль:
Ввод: 0
Вывод: Введите пароль:
Ввод: 104
Вывод: Введите пароль:
Ввод: 666
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.