Помогите составить программу паскаль нахождение произведения квадратов трех натуральных чисел
Помогите составить программу паскаль нахождение произведения квадратов трех натуральных чисел
Гость
Ответ(ы) на вопрос:
ГостьVar
A,B,C:integer;
Begin
WriteLn('Введите три натуральных числа');
ReadLn(A,B,C);
WriteLn('P = ',A*A*B*B*C*C);
End.
Не нашли ответ?
Похожие вопросы