написать программу в паскаль! Вычислить значение выражения (a-b)/(c-d)

Question

написать программу в паскаль! Вычислить значение выражения (a-b)/(c-d)

Дмитрий Рудковский Ученик (142), закрыт 8 лет назад

Answer 1

program xxx
var a, b, c, d, e: real;
Begin
WriteLn ('Напишите через пробел значения a, b, c, d');
ReadLn (a, b, c, d);
e:=(a-b)/(c-d);
WriteLn ('Значение выражения=', e);
WriteLn ('Нажмите Enter для завершения');
ReadLn
End.

Answer 2

Imobilazer Искусственный Интеллект (222546) 8 лет назад

readln(a,b,c,d);
writeln((a-b)/(c-d));

Answer 3

Ivan Salauyou Гуру (2554) 8 лет назад

if (c-d)<>0 then z:=(a-b)/(c-d);