Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
CLOCKWORK
0 / 0 / 1
Регистрация: 27.10.2012
Сообщений: 55
1

Рассчитать значение x, определив и использовав функцию

04.11.2012, 19:07. Просмотров 926. Ответов 1
Метки нет (Все метки)

Задание 5. Написать программы с использованием:
А) процедуры
Б) функции
Дополнительная информация на фото
0
Миниатюры
Рассчитать значение x, определив и использовав функцию  
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.11.2012, 19:07
Ответы с готовыми решениями:

Рассчитать значение x, определив и использовав необходимую функцию
8.1) Рассчитать значение x, определив и использовав необходимую функцию:

Рассчитать значение x, определив и использовав необходимую функцию
1. Рассчитать значение x, определив и использовав необходимую функцию: кв.кор 6+6 кв.кор 13+13...

Рассчитать значение х, определив и использовав необходимую функцию
Написать программу с использованием: А) процедуры Б) функции Рассчитать значение х, определив...

Рассчитать значение x, определив и использовав необходимую функцию
8.1) Рассчитать значение x, определив и использовав необходимую функцию:

Рассчитать значение х, определив и использовав необходимую функцию (процедуру)
Рассчитать значение х, определив и использовав необходимую функцию (процедуру):...

1
Puporev
Модератор
58496 / 44426 / 30676
Регистрация: 18.05.2008
Сообщений: 106,434
04.11.2012, 19:27 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
uses crt;
function F(a,b:integer):real;
begin
F:=(a+sqrt(b)/(b+sqrt(a)));
end;
begin
clrscr;
write('x=',F(15,8)+F(6,12)+F(7,21):0:2);
readln
end.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
procedure P(a,b:integer;var c:real);
begin
c:=(a+sqrt(b)/(b+sqrt(a)));
end;
var c1,c2,c3:real;
begin
clrscr;
P(15,8,c1);
P(6,12,c2);
P(7,21,c3);
write('x=',c1+c2+c3:0:2);
readln
end.
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.11.2012, 19:27

Рассчитать значение y, определив и использовав необходимую функции
1. Рассчитать значение y, определив и использовав необходимую функции:...

Рассчитать значение y, определив и использовав необходимую функции:
у=(1+sin1/3)+(5+sin5/3)+(3+sin3/3) Использовать функцию, потом программа

Рассчитать значение X, определяя и использовав функцию
Рассчитать значение X, определяя и использывав необходимую функцию ...


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

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

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