Размещено 5 лет назад по предмету
Информатика
от bukenbayev2000
program esep8;
Uses crt;
var x,y,z,S,P:double;
begin
clrscr;
writeln('x,y,z-енгиз');
readln(x,y,z);
S:=x+y+z;
P:=x*y*z;
If S>P then write('косынды улкен=',S,'>',P);
Else if s
',P)
else write('кобейтинди улкен',S,'>',P)
readln;
end.