Ответы
Ответ дал:
0
Var
x: real;
Begin
writeln('введите температуру');
readln(x);
if x>15 then writeln('тепло') else writeln('холодно');
readln;
End.
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад