3) Сделать программку, которая сопоставляет два числа и выводит извещение с информацией
3) Сделать программку, которая сопоставляет два числа и выводит известие с информацией о том какое число больше, и на сколько больше. Даю 99 Пиров
Задать свой вопросБолее удобный, компактный и требующий меньше памяти код, чем у предшествующего ответа.
Объяснение:
1) вводятся два числа и забиваются в значения a и b соответственно.
2)при помощи команды else производится отбор. Если а больше b, то идет запись, если нет, то идет иное else, где если a меньше b, то идет запись их. В окончательном случае, если не производится ни то, ни то, то просто выводится, что они одинаковы, т.к больше нет никаких вариантов.
Код:
Program school6;
var a,b:real;
begin
write ('Введите 1-ое число:');
readln(a);
write ('Введите 2-ое число:');
readln(b);
if agt;b then
write ('Первое число больше второго на ', a-b)
Else
If alt;b then
write ('2-ое число больше первого на ', b-a)
Else Write('числа равны');
end.
Program comparison;
var
a,b,c:real;
begin
write ('Введите первое число:');
readln(a);
write ('Введите 2-ое число:');
readln(b);
if agt;b then
begin
c:=a-b;
write ('1-ое число больше второго на ', c);
end;
if alt;b then
begin
c:=b-a;
write ('Второе число больше первого на ', c);
end;
if a=b then
write ('Числа равны');
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.