Какую задачу решает данная программа. Что нужно изменить в программе, чтобы она решила задачу нахождения утроенного частного двух чисел.

program pr3;

var a, b, c: integer;

begin

readln (a, b) ;

c:=sqr (a) + sqr (b) ;

writeln ('c=', c) ;

end.

Question

Христюша

23 марта, 08:11

+2

Ответы (1)

Знаете ответ на вопрос?

Екатерина · Answer 1

Программа находит сумма квадратов двух чисел, чтоб уьроенного меняешь только строку c = и пишешь c=a*3+b*3