Задание:
Написать программу, вычисляющую квадрат суммы двух введенных чисел. (написать на языке программы паскаль, и если кто забыл, то квадрат суммы это — квадрат первого числа плюс удвоенное произведение первого на второе плюс квадрат второго числа)
Решение:
Program name (input; output); uses crtvar a,b,c: real; beginclr scr; writeln ('a,b'); readeln (a,b); c: =sqr (a)+2*a*b*sqr (b); writeln (`c=`,c: 4:2); repeat until keypressed; end.
Знаете другой ответ?