program test;
var a,b:integer;
begin
writeln('Какое количество осадков в сумме выпало за первые 7 дней октября в первый год?');
readln (a);
writeln('Какое количество осадков в сумме выпало за первые 7 дней октября во второй год?');
readln (b);
if a>b then write ('Верно');
if a<b then write ('Неверно') else
write ('Осадки за первый год равны осадкам за второй год');
end.
program test;
var a,b:integer;
begin
writeln('Какое количество осадков в сумме выпало за первые 7 дней октября в первый год?');
readln (a);
writeln('Какое количество осадков в сумме выпало за первые 7 дней октября во второй год?');
readln (b);
if a>b then write ('Верно');
if a<b then write ('Неверно') else
write ('Осадки за первый год равны осадкам за второй год');
end.