Вопрос школьника по предмету Информатика
write(‘Вы желаете покинуть программу? Если да-нажмите 1, если нет- нажмите ЛЮБОЕ ЧИСЛО ‘);
read(i);
until a=1;
write(‘Программа завершена. Спасибо за использование’);
end.
ОТРЕДАКТИРУЙТЕ ПОЖАЛУЙСТА ЧТОБЫ ВЫПОЛНЯЛОСЬ
Ответ учителя по предмету Информатика
var a:integer;
begin
repeat
write(‘Вы желаете покинуть программу? Если да-нажмите 1, если нет- нажмите ЛЮБОЕ ЧИСЛО ‘);
readln(a);
until a=1;
write(‘Программа завершена. Спасибо за использование’);
end.
Пример:
Вы желаете покинуть программу? Если да-нажмите 1, если нет- нажмите ЛЮБОЕ ЧИСЛО 3
Вы желаете покинуть программу? Если да-нажмите 1, если нет- нажмите ЛЮБОЕ ЧИСЛО 1
Программа завершена. Спасибо за использование
Похожие вопросы от пользователей