tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Исправьте program pr1; var f,x,pi,a,ak,an,da:
Исправьте program pr1; var f,x,pi,a,ak,an,da: real; begin write ('введите an,ak,da'); readln (an,ak,da); a: =an; while a< =ak+0.0001 do begin pi: = 3.14; x: =exp(a)+exp(-a); f: =0.5x-2cos(x)(x+pi/4); writeln('x=',x,'f=',f); a: =a+da; end; end.
janavotkinsk
3 22.08.2019 10:10
0
Ответы
potapovp016
05.10.2020 12:16
Замени строчку f:=0.5x-2cos(x)(x+Pi/4); на f:=0.5*x-2cos(x)*(x+Pi/4);
Без знака умножения не пойдет.
И write ('введите an,ak,da'); лучше на writeln ('введите an,ak,da');
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Eliseevka12
24.02.2020 22:28
нужно сделать таблицу в Эксель и Ворде , она не сложная уже забыла как делается.. )...
Ааа5678
13.05.2020 13:26
Какова мощность алфавита, с которого записано сообщение объемом 15 Кбайт и состоящее из 20480 символов?...
vitalik6300
13.05.2020 13:26
В файле содержится двумерный массив размерностью n × n. В новый файл вывести отсортированный массив.Четные столбцы по убыванию, нечетные по возрастанию с сортировки Шелла...
yaaaaaaan
03.06.2019 21:50
Найти сумму элементов последовательности с точностью 0,001: s=1 + 2/(2*3) - 4/(3*9) + 6/(5*27) - 8/(8*81) + 10/(13*243) -...
Ьвот
03.06.2019 20:38
Вкаких случаях в результате обработки информации меняется ее содержание? a) учащийся решает b) учащийся переводит число из 10-ной системы счисления в 2-ную c) ребенок, посмотрев...
iPHONee12
03.06.2019 20:41
Как называется основной компьютер в компьютерной сети? a) браузер b) терминал c) сервер d) провайдер...
pomogite361
07.08.2019 13:50
Вкорзине 128 шаров, вытащили 13. сколько бит информации мы получили...
saharok16
22.07.2019 04:20
Решить ! мне требуется подробное решение! робинзон крузо отправился на плоту от острова а до острова в, а пятница на своем плоту поплыл ему навстречу от острова в к острову...
tsokurdmitriy
30.10.2020 20:39
Fill in the gaps with the correct form of TO BE. Mind the capital letters....
viktoria383
30.10.2020 20:39
если сделать задачу по информатике нужно (задание в закрепе)....
Популярные вопросы
Вкаких случаях объекты не перемещаются в корзину? ответ объясните...
1
Утёс ночевала тучка золотая на груди утеса-великана; утром в путь она...
2
Дайте характеристику предложению - прежде люди рассказывали сказки,делились...
3
Правило безопасного поведения на дискотеке. обж...
1
Запиши предложения вставляя буквы безударных гласных в корне, в скобках...
3
Даулет купил машинку за 750 тенге, и несколько шариков по 15 тенге. за...
2
Вычеслите мне быстро надо 2)-8×(-5)+75÷(-15) 4) 19-(2-18÷3)-25 6)-11×(5-9)-60÷(-12)...
1
Если 701 и 592 разделить на одно и тоже число, то получим соответственно...
2
Кто придумал осевую и центральную симетрию...
1
Как расставить знаки между 13-ю девятками, чтобы получилось 2009...
3
Без знака умножения не пойдет.
И write ('введите an,ak,da'); лучше на writeln ('введите an,ak,da');