Составить программу вычесления модуля разности |a-b|=z

Question

Составить программу вычесления модуля разности |a-b|=z

Экономика

Гость

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

Accepted Answer

Var a, b, ztemp, z : real; Begin Write('Введите а: '); Readln(a); Write('Введите b: '); Readln(b); ztemp := a - b; Z := abs(ztemp); Write('z = ', z); End.