• Нужна помощь по Pascal abc . Нужна программа , которая сравнит два введенных числа и напишет , какое больше .

Ответы 3

  • Спасибо ! Только начинаю изучать самостоятельно ...
    • Автор:

      c-dawg
    • 5 лет назад
    • 0
  •  Всё довольно просто, держи: program WhatAreMoreHere;  var    a,b:integer;   begin  writeln(); writeln(' Введите первое число: '); readln(a);  writeln(); writeln(' Введите второе число: '); readln(b);  if (a=b) then  writeln(' Число ', a, ' = ', b, '.');   if (a>b) then  writeln(' Число ', a, ' больше чем число ', b, '.');   if (b>a) then  writeln(' Число ', b, ' больше чем число ', a, '.');   end.
    • Автор:

      arthur
    • 5 лет назад
    • 0
  • // PascalABC.Netvar  a,b:integer;begin  Write('Введите через пробел числа а и b: '); Read(a,b);  if a=b then Writeln('Числа равны')  else    if a>b then Writeln(a,'>',b)    else Writeln(a,'<',b)end.
    • Автор:

      austin
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years