Написать программа в паскаль: ввести 2 числа вычислить из большего меньшее

KarinaDelacour KarinaDelacour    1   29.08.2019 08:50    1

Ответы
кристина2162 кристина2162  10.08.2020 01:23
Первый вариант:

Var
   a,b:real;
Begin
Write('Введите два числа: ');ReadLn(a,b);
if a>b then Write(a-b)
else Write(b-a)
End.

Второй вариант:

Var a,b:real;
Begin
Write('Введите два числа: ');ReadLn(a,b);
WriteLn(Abs(a-b))
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика