Пожалуйста помогите с информатикой срочноооооооо pascal a=7 b=16 c=13 Надо по формуле...

0 голосов
37 просмотров

Пожалуйста помогите с информатикой срочноооооооо pascal
a=7
b=16
c=13
Надо по формуле создать программу в Паскаль
y=(a*a+b*b):7+c:(a-b)


Информатика (24 баллов) | 37 просмотров
Дан 1 ответ
0 голосов

Program psck;
vara,b,c: integer;y: real;
begin
a:=7;b:=16;c:=13;y:=(a*a+b*b)/7+c/(a+b);writeln('y = ',y);    end.

(1.7k баллов)
0

program psck;

var
a,b,c: integer;
y: real;

begin

a:=7;
b:=16;
c:=13;
y:=(a*a+b*b)/7+c/(a+b);
writeln('y = ',y);

end.

0

Спасибо большое