Вычислить сумму квадратов трех переменных, введенных с клавиатуры в паскале, создать...

Question

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

Answer 1

Var a,b,c, d: integer;
begin  readln(a,b,c);    d := a*a + b*b + c*c;    writeln(d)end.