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

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

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


Информатика (24 баллов) | 16 просмотров
Дан 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.