Question

Написать программу на языке программирования Паскаль Зная температуру воздуха, определить вид осадков (дождь или снег).

Answer 1

Var x: integer;
begin
writeln ('Введите температуру воздуха');
readln (x);
if x<0 then writeln ('Дождь') 
else writeln ('Снег");
end.