program ifz44;uses crt;var x,y,c:integer;beginwriteln('vvedite x');readln(x);writeln('vvedite y');readln(y);..................
program ifz44;
uses crt;
var x,y,c:integer;
begin
writeln('vvedite x');
readln(x);
writeln('vvedite y');
readln(y);
..................