Можно ли записать данную программу используя циклы While и Repeat?Если да то предложите свой вариант.
program 5;
uses crt;
var i,n:integer ; x,y,s,p: real;
begin
x:=4.1; S:=0; P:=1;n:=10;
for i:=1 to n do
begin
s:= s+ ln(sqr(x)+I);
P:= p*(i+4*cos(x+I));
end;
Y:= s+p;
writeln('___x=',x:5:1,'___Y=',y:10:2);
writeln('___s=',s:5:3,'___P=',p:10:2);
end.

Реклама
Lordd007

Ответы и объяснения

Лучший Ответ!

Цикл while.................

5.0
1 оценка
1 оценка
Оцени!
Оцени!