|
Название: Помогите с Контрольной работой Отправлено: sah от 24 Декабря 2003, 19:57 Помогите, кто сможет, есть проблема с
12. Контрольная работа № 1 Вариант 3 Задание 6. Составить блок-схему алгоритма и программу на алгоритмическом языке Паскаль Сылка на задание (http://vzf.mstu.edu.ru/materials/method_1/kr1_3.shtmlurl) <a href="mailto: sah-sah@yandex.ru">Черканите если что (http://forum.murman.ru/images/smilies/smile.gif) </a> Название: Помогите с Контрольной работой Отправлено: Proud от 25 Декабря 2003, 14:12 var z,x,t: real;
begin write('введите t: '); readln(t); x:=0.2; while x<=2 do begin if x<0.5 then z:=(sqr(ln(x))*ln(x) sqr(x))*sqrt(x t) else if x=0.5 then z:=sqrt(x t) 1/x else z:=cos(x) t*sqr(sin(x)); writeln('x=',x:5:2,' z=', z:5:2); x:=x 0.2; end; end. Название: Помогите с Контрольной работой Отправлено: sah от 25 Декабря 2003, 22:36 Большое спасибо Proud выручил (http:////forum.murman.ru/images/smilies/rolleyes.gif)
Название: Помогите с Контрольной работой Отправлено: студент от 14 Февраля 2004, 11:51 Благодори Proud(может это Надежда Михаловна)
|