Предмет:
ИнформатикаАвтор:
dylan17program qq;
uses crt;
var x,y,h: real;
begin
x:=0;
clrscr;
write('H= ');
read(h);
while (x<=1) do begin
y:=arctan(0.2*x)/1+x*x;
writeln('x = ',x,' Y = ',y);
x:=x+h;
end;
end.
Автор:
loveymh9xДобавить свой ответ
Предмет:
Русский языкАвтор:
ruben52hjОтветов:
Смотреть
Предмет:
Русский языкАвтор:
mariannak5t1Ответов:
Смотреть
Предмет:
МатематикаАвтор:
hamzaknappОтветов:
Смотреть
Предмет:
Українська моваАвтор:
samanthaproctorОтветов:
Смотреть