Для 4 произвольных чисел, введенные с клавиатуры, выведите на ...
Для 4 произвольных чисел, введенные с клавиатуры, выведите на экран соответствующие результаты.если разностьпервых двух чисел превышает четвертое,то выведите все четыре числа без изменения. Если сумма всех чисел не больше 80, то выведите только два первых числа. Если выполняется одновременно два перечисленных выше условия, то выведите только два последних числа.Иначе, выведите все четыре числа,увеличев их на 5
Есть ответ
17.12.2022
141
Ответ
Одна тонкость - разность первых 2-ух чисел это из первого вычитаем второе или из второго первое?
Program Chisla;
Uses Crt;
var a,b,c,d,sum:real;
begin
clrscr;
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
write('Введите третье число: ');
readln(c);
write('Введите четвёртое число: ');
readln(d);
sum:=a+b+c+d;
if ((a-b)>d) and (sumd then writeln(a,b,c,d)
else
if (sum
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022