БЛОК СХЕМА
var a,b:integer;
begin
writeln('Введите в одной строке два целых числа и нажмите ');
readln(a,b);
if a>b
then writeln(a,'больше',b)
else if a writeln(a,'меньше',b)
else writeln('Числа равны');
end.
var a,b:integer;
begin
writeln('Введите в одной строке два целых числа и нажмите ');
readln(a,b);
if a>b
then writeln(a,'больше',b)
else if a writeln(a,'меньше',b)
else writeln('Числа равны');
end.
More Questions From This User See All
Answers & Comments
a,b:integer;
Begin
writeln('Введите в одной сроке два целых числа');
readln(a,b);
if (a>b) then writeln(a,' больше ',b)
else
if (a<b) then writeln(a,' меньше',b)
else writeln('Числа равны');
End.