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

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