Предмет: Информатика,
автор: thereayo
Составить программу для вычисления значений функции F(x)
на отрезке [а, Ь] с шагом h. Результат представить в виде таблицы,
первый столбец которой — значения аргумента, второй — соответствующие
значения функции.
F(x) = 2sin^2(квадрат)x+1;
Ответы
Автор ответа:
0
uses Crt;
Var a,b,h:real;
Begin
ClrScr;
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
Write('h = ');ReadLn(h);
Repeat
WriteLn('F(',a,') = ',2*Sqr(Sin(a))+1);
a:=a+h;
Until a > b;
ReadKey
End.
Var a,b,h:real;
Begin
ClrScr;
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
Write('h = ');ReadLn(h);
Repeat
WriteLn('F(',a,') = ',2*Sqr(Sin(a))+1);
a:=a+h;
Until a > b;
ReadKey
End.
Автор ответа:
0
Паскаль? Если да, то какой именно?
Автор ответа:
0
По информатике задали, но Repeat и Until не проходили.
Автор ответа:
0
Вы вообще понимаете, что я спрашиваю?
Автор ответа:
0
Да, я понимаю. Можете мне хотя бы объяснить тогда решение?
Автор ответа:
0
Раз понимаете, так ответьте на вопрос: если Вам всё-таки нужна программа на языке Pascal, то какой именно Паскаль Вы проходите? Сейчас в различных учебных заведениях могут изучать 6 различных Паскалей(Turbo, Free, ABC, Delphi, Lazarus и ABC.NET)
Похожие вопросы
Предмет: Русский язык,
автор: suga7717
Предмет: Русский язык,
автор: dianakris2009
Предмет: Алгебра,
автор: araslanoveldar08
Предмет: Алгебра,
автор: wwwalex1998
Предмет: Математика,
автор: Аноним