Написать программу, которая сравнивает два целых числа и выводит
на экран наибольшее.

Вот, надеюсь правильно

Объяснение:

program A;

var i,j:integer;

begin

readln(i);

readln(j);

if i>=j then writeln(i) else writeln(j);

end.

Programm A, U He Correct

uses crt; var

  v,r,h: real; begin  write('r='); readln(r);   write('h='); readln(h);   v: =pi*sqr(r)*h;   write('v=',v); end.

часть схемы, информацию - канал.