program Pogoda; var T:real; begin write('T='); readln(T); if T>10 then writeln ('хорошая погода') else begin ; writeln('плохая погода'); end; end.
program Pogoda;
var
T:real;
begin
write('T=');
readln(T);
if T>10 then
writeln ('хорошая погода')
else begin ;
writeln('плохая погода');
end;
end.