1. Информатика
  2. Написать программу которая

Написать программу которая будет спрашивать два числа и если их разница (a-b) больше нуля , то написать "больше" , а если их разница меньше нуля написать "меньше"

паулодибала паулодибала    2   24.11.2019 19:17    1

Ответы
zild228 zild228  11.08.2020 19:04

var a,b:Integer;

begin

Write('Введите первое число ');

ReadLn(a);

Write('Введите второе число ');

ReadLn(b);

if a-b>0 then Write('БОЛЬШЕ');

if a-b<0 then Write('Меньше')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ledilove77 ledilove77  05.05.2020 17:14
Определите значения переменных a и b после выполнения команд. a:= −5; b:= abs (a) + 2; a:= 8 + a; b:= b div a; a:= a + b. Запишите ответ: a=…, b=… ....
Ласточка005 Ласточка005  05.05.2020 17:14
Не үшін кейіпкердің костюмын ауыстырады​...
abdrahmanovamir123 abdrahmanovamir123  05.05.2020 17:14
МЕНЯ УЧИЛКА УБЬЕЕЕЕЕЕЕЕТТТТТТТТТТТТТ...
sergeybondarchyk sergeybondarchyk  05.05.2020 17:13
Антон составляет 5-буквенные слова, в которых есть только буквы П, А, К, Е,Т, причём буква Т используется в каждом слове хотя бы 2 раза. Каждая из других допустимых букв...
сашагушцщц сашагушцщц  11.09.2019 02:50
Вот зачем мне ? правильно, незачем. переведите мне из двоичной системы счисления в десятичную число 1011...
rahcheeva81 rahcheeva81  03.07.2019 21:00
Решить уравнение: 10101+х(8)=113(10)...
Павви Павви  15.08.2019 03:20
1)отметьте высказывание, в котором упоминается подкласс парусников. а)корабли разгружаются в портах. б)у парусников есть мачты. в)среди кораблей есть парусники. 2)отметьте...
mavikon mavikon  15.08.2019 03:20
Файл размером 4 кбайт передаётся через некоторое соединение со скоростью 4096 бит в секунду. определите размер файла (в байтах), который можно передать за то же время через...
alexdias alexdias  15.08.2019 03:20
Файл размером 4 кбайт передаётся через некоторое соединение со скоростью 4096 бит в секунду. определите размер файла (в байтах), который можно передать за то же время через...
alekseykraynov alekseykraynov  15.08.2019 03:20
Втаблице запросы и количество найденных по ним страниц некоторого сегмента сети интернет. запрос найдено страниц (в тысячах) фуболlхоккей 20000 футбол 14000 хоккей 16000...

Популярные вопросы