задача №2 урок 9

program training;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };

begin;
b := readln('напишите 1-ое число');
a := readln('напишите 2-ое число');
if (a > b) then;
begin;
writeln(a + b);
writeln(a - b);
if((a + b) > 25) then;
begin;
writeln('a');
writeln('b');
end;
end;
end.