program Belozor2; var a,b,v: integer; begin writeln('Введите первое слагаемое'); readln(a); writeln('Введите второе слагаемое'); readln(b); writeln ('Введите 1 если хотите выбрать сложение') ; writeln ('Введите 2 если хотите выбрать вычитание'); writeln ('Введите 3 если хотите выбрать умножение'); writeln ('Введите 4 если хотите выбрать деление'); readln(v); if v=1 then writeln (a+b); if v=2 then writeln (a-b); if v=3 then writeln (a*b); if v=4 then writeln (a/b:0:2); readln (); end.