Помогите составить программу паскаль нахождение произведения квадратов трех натуральных чисел

Question

Аникитка

14 февраля, 23:48

+3

Ответы (1)

Знаешь ответ?

Костюха · Answer 1

Var

A, B, C:integer;

Begin

WriteLn ('Введите три натуральных числа');

ReadLn (A, B, C);

WriteLn ('P = ', A*A*B*B*C*C);

End.