Надо в сосуд 3 налить 1р перелить в 5л и снова в 3л и в 5л останеться в 3л 1 л
300*200=600000
600000*8/8/1024~59Кб
Обозначение примерно (~)
Должно быть так, если не напутал
Program 1;
var x : integer;
begin
write('введите число');
readln(x);
if x<5 then write(xxp(10)) else write('число <5');
readln;
<span>end.</span>
Var a,b:integer;
begin
readln(a,b);
if a>b then write(a)
else write(b)
end.