Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var a: integer;
begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.
var x1,x2,x3,x4: integer;
function max(a,b: integer): integer
begin
if a> b then max: = a
else max: =b;
end;
read(x1,x2,x3,x4);
x1: =max(x1,x2);
x2: =max(x3,x4);
writeln(x1);
end.
var a,b,c: integer;
read(a,b,c);
if a> =0 then writeln(a);
if b> =0 then writeln(b);
if c> =0 then writeln(c);
495+459=954 954-459=495
Популярные вопросы