ввести с клавиатуры 2 целых числа ,вывести больше из них ,написать первое это число или второе (написать на паскале)помогите пожалуйста
Ответы
Ответ дал:
0
var a, b: integer;
begin
read(a); read(b);
if (a > b) then
writeln('Первое число больше второго')
else
begin
if (a < b) then
writeln('Второе число больше первого')
else
writeln('Числа равны');
end;
end.
begin
read(a); read(b);
if (a > b) then
writeln('Первое число больше второго')
else
begin
if (a < b) then
writeln('Второе число больше первого')
else
writeln('Числа равны');
end;
end.
Ответ дал:
0
один елсе и скобки лишние
Ответ дал:
0
var
a, b: integer;
begin
readln(a, b);
if (a > b) then
writeln('Первое число больше = ', a)
else if (a < b) then
writeln('Второе число больше = ', b)
else
writeln('Числа равны');
end.
a, b: integer;
begin
readln(a, b);
if (a > b) then
writeln('Первое число больше = ', a)
else if (a < b) then
writeln('Второе число больше = ', b)
else
writeln('Числа равны');
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад