Напишите функцию которая возвращает сумму действительных чисел a b с d
Напишите функцию которая возвращает сумму действительных чисел a b с d
Гость
Ответ(ы) на вопрос:
ГостьVar
A,B,C,D:real;
Begin
WriteLn('Введи четыре числа');
ReadLn(A,B,C,D);
WriteLn(A,' + ',B,' + ',C,' + ',D,' = ',A+B+C+D);
End.
Не нашли ответ?
Похожие вопросы