Кто понимает паскаль!Y1=sqrt(x); Y2=1/x;Y3=x/2X∈[1;k] c началом 0,5.Помогите!!!
Кто понимает паскаль!
Y1=sqrt(x); Y2=1/x;Y3=x/2
X∈[1;k] c началом 0,5.
Помогите!!!
Гость
Ответ(ы) на вопрос:
Гостьvar x,y1,y2,y3:real;
k:integer;
begin
readln(k);
x:=1;
repeat
y1:=x;
write(y1:3:2,' ');
y2:=1/x;
write(y2:3:2,' ');
y3:=x/2;
write(y3:3:2);
x+=0.5;
writeln;
until x>k;
end.
как я понял
Не нашли ответ?
Похожие вопросы