1 / 1 / 2
Регистрация: 12.05.2015
Сообщений: 313
1

Найти значение функции и вывести только целую часть

22.10.2015, 17:25. Показов 709. Ответов 6
Метки нет (Все метки)

Можете проверить код на ошибки
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Program z2;
Var a,b,c:integer;
       y:real;
 begin
Writeln('Введите a: ');
Writeln('Введите b: ');
Writeln('Введите с: ');
Readln(a);
Readln(b);
Readln(с);
y:=cos(cos(cos(a+b))+c));
WriteLn('Значение функции = ',tranc(y));
End.
функция:cos(cos(cos(a+b)+c);
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.10.2015, 17:25
Ответы с готовыми решениями:

Программа выводит только целую часть числа
//Найти среднее арифметическое среди // простых чисел, расположенных после минимального значения....

Из N вещественных чисел, задаваемых оператора ввода, найти отрицательные и вывести на экран целую и дробную часть этих чисел отдельно.
Застрял на данных задачках... 1) Найти дробную часть вещественного числа х, если целые числа...

Как убрать целую часть у дроби и оставить только одну цифру?
Смотрите, у меня есть десятичная дробь - 10.858, мне нужна только первая цифра после запятой, то...

Вычислить целую часть и остаток от деления х/у, пользуясь только операцией сложения и вычитания
Даны натуральные числа х и у. Вычислить целую часть и остаток от деления х\у, пользуясь только...

6
Почетный модератор
64073 / 47484 / 32734
Регистрация: 18.05.2008
Сообщений: 115,185
22.10.2015, 17:33 2
Pascal
1
WriteLn('Значение функции = ',trunc(y));
0
1 / 1 / 2
Регистрация: 12.05.2015
Сообщений: 313
22.10.2015, 17:45  [ТС] 3
ругается на количество скобок
0
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
22.10.2015, 17:51 4
Цитата Сообщение от mordol Посмотреть сообщение
y:=cos(cos(cos(a+b))+c));
лишняя
но лучше проверить по заданной формуле
1
Почетный модератор
64073 / 47484 / 32734
Регистрация: 18.05.2008
Сообщений: 115,185
22.10.2015, 17:53 5
Цитата Сообщение от mordol Посмотреть сообщение
ругается на количество скобок
Так научись считать до трех...
0
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
22.10.2015, 17:53 6
А то может оказаться и так:
y:=cos(cos(cos(a+b))+c))
0
1 / 1 / 2
Регистрация: 12.05.2015
Сообщений: 313
22.10.2015, 17:54  [ТС] 7
понял свою ошибку
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.10.2015, 17:54

Вывести целую часть обыкновенной дроби
Здравствуйте,не получается вывести результат из программы(там нужно вывести целую часть...

Вывести целую и дробную часть вещественного числа
Если целая и дробная часть числа равны - вывести на экран True Нет - False Приведенный ниже код...

Вывести число, заменив на целую часть от деления на 3
Ввести три числа. Вывести каждое число, заменив на целую часть от деления на 3. Использовать свою...

Вывести: знак, целую часть, сокращенные числитель и знаменатель
Вводятся числитель и знаменатель дроби. Вывести: знак, целую часть, сокращенные числитель и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.