Программа запрашивает двухразрядное число, если оно чётное и больше 50, то отобразить слово «Весна», иначе "Oсень". *20 баллов
Ответы на вопрос
Ответил antonk2000
0
Ответ:
var
a: real;
begin
Write(‘Введите двухразрядное число>>’);
Readln(a);
while (a<10) or (a>99) do
begin
Write(‘Введите двухразрядное число>>’);
Readln(a);
end;
if (a mod 2 = 0) and (a>50) then
Write(‘Весна’)
else
Write(‘Осень’);
end.
Объяснение:
while (a<10) or (a>99) do
begin
Write(‘Введите двухразрядное число>>’);
Readln(a);
end; — это нужно, чтобы ввели именно двузначное число
Новые вопросы