Файл: Программа на Паскале Program nanny Var T real begin writeln("Ты вчера болен. Измерька температуру!") readln t 36. 6 then begin.rtf
ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 30.11.2023
Просмотров: 58
Скачиваний: 3
ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
Вариант 1:
Ты вчера был болен. Измерь-ка температуру!
Сообщи, какая у тебя температура: 36.5
ты здоров, дружок! Можешь идти в школу.
Желаю успехов!
Вариант 2:
вчера был болен. Измерь-ка температуру!
Сообщи, какая у тебя температура: 37.3
Ты еще болен! Раздевайся и ложись в постель.
Поправляйся, дружок
алг НЯНЬКА
вещ Т
нач
вывод"Ты вчера был болен.Измерь-ка температуру!"
вывод"Сообщи,какая у тебя температура:"
ввод(Т)
если Т>36,6
то вывод "Ты еще болен. Раздевайся и ложись в постель.
вывод "Поправляйся лружок!"
иначе вывод "Ты здоров, дружок! Можешь идти в школу."
вывод "Желаю успехов!"
кв
кон
По этому алгоритму получается следующая программа на Паскале:
Program NANNY;
Var T: real;
begin
writeln("Ты вчера болен. Измерь-ка температуру!");
readln T > 36.6
then begin
writeln("Ты еще болен! Раздевайся и ложись в постель.";
writeln("Поправляйся, дружок!)
end
else begin
writeln("Ты здоров, дружок!
Можешь идти в школу.");
writeln("Желаю успехов!")
end.