Регистрация
stefaniiadr
25.06.2021 01:16
Информатика
Есть ответ 👍

Даны три числа a,b,c. Вычислите, на сколько самое большое из них больше самого маленького ( в Паскале)

297
434
Посмотреть ответы 2

Ответы на вопрос:

Mished
Mished
4,8(47 оценок)

Код рабочий, проверял

Program Min-Max;

var a,b,c,min,max:integer;  # задаём переменные

begin

write('Введите 3 числа для сравнения (через пробел) : ');read(a,b,c); # ввод данных

min:=a;max:=a;

if b>max then max:=b;if b<min then min:=b;  # сравниваем числа

if c>max then max:=c;if c<min then min:=c;

write(max - min);  # выводим результат

end.

Если ответ , отметьте его как лучший.

cherry1527
cherry1527
4,4(63 оценок)

если не ошибаюсь ее передает 1) выращена им самим роза на его планете,2)также ему частично передает информацию его друг лисенок. вроде так

Популярно: Информатика