Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
Shiffu
0 / 0 / 0
Регистрация: 12.07.2011
Сообщений: 16
1

Определить, пройдет ли график функции через заданную точку

13.07.2011, 14:14. Просмотров 626. Ответов 2
Метки нет (Все метки)

Здравствуйте помогите пожалуйста!
Нужно решить 2 задачи .В основной программе должен быть оператор выбора задач, оформленных в виде подпрограмм..
1. Составить программу, определяющую, пройдет ли график функции у = ах2 + bх + с через заданную точку с координатами (t, s), пройдет выше или ниже её.
2.Двумерный массив п х т содержит некоторые буквы русского алфавита, расположенные в произвольном порядке. Написать программу, проверяющую, можно ли из этих букв составить данное слово S. Каждая буква массива используется не более одного раза.

Добавлено через 51 секунду
вот есть но не уверен что правильно
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
uses crt;
var a             :array [1..255] of char;
    s             :string;
    s1            : string;
    flag          : boolean;
    i, wibor      :integer;
    y,x,aa,b,c,t,e :real;
procedure Per(R, S : String);
var N : Byte; Tmp : String;
begin
if Length(S) = 0 then
If r = s then
begin
 Writeln ('Âîçìîæíî!');
 flag := True;
 exit;
end
else
for N := 1 to Length(S) do
begin
Tmp := S; Delete(Tmp, N, 1);
Per(R + S[N], Tmp);
end;
end;
procedure first;
begin
Writeln ('Ââåäèòå ñòðîêó');
Readln(s);
For i:=1 to length(s) do
begin
 Writeln ('Ââåäèòå ñèìâîë ¹',i);
 Readln(a[i]);
 s1:=s1+a[i];
end;
Per('', s1);
If not flag  Then Writeln ('Íåâîçìîæíî')
end;
procedure second;
 
begin
writeln('ââåäèòå à , â , ñ , õ , ó - ÷åðåç ïðîáåë');
readln(aa,b,c,x,y);
y:=aa*x*2+b*x*c;
e:=random(15);t:=random(15);
 if (y=e) then writeln('le jit');
 if y>e then writeln('down');
 if y<e then writeln('up');
end;
begin
writeln('âûáåðèòå ïðîãðàììó : 1.ïåðâàÿ, 2.âòîðàÿ');
readln(wibor);
if wibor=1 then first else if
wibor=2 then second;
 
end.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.07.2011, 14:14
Ответы с готовыми решениями:

Определить, пройдет ли график функции через точку с заданными координатами
1)Написать программу проверки, является ли данный четырехугольник квадратом 2)Составьте программу,...

Определить, пройдет ли график функции y=5x2-7x+2 через точку с заданными координатами
Составить программу, определяющую, пройдет ли график функции y=5x2-7x+2 через заданную точку с...

Определить, пройдет ли график функций через заданую точку с координатами
Составить программу, определяющую, пройдет ли график функций y=5x2-7x+2 через заданую точку с...

Пройдет ли график функции через заданную точку
1. Клоун предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к задуманному...

Составить программу, определяющую, пройдет ли график функции через заданную точку
товариши мозги помогите пожалуста чем сможете а то самой не как не справица одна надежда осталось...

2
Puporev
Модератор
57883 / 44083 / 30451
Регистрация: 18.05.2008
Сообщений: 105,488
13.07.2011, 15:25 2
А это чем не подошло?
В основной программе должен быть оператор выбора задач, оформленных в виде подпрограмм..
Или думаешь еще кто-то на тебя, халявщика, время будет тратить?
1
Shiffu
0 / 0 / 0
Регистрация: 12.07.2011
Сообщений: 16
13.07.2011, 16:34  [ТС] 3
да я просто изначально не увидел ( со зрением проблемы ) тут все нормально спасибо огромное )
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.07.2011, 16:34

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

Определить пройдет ли кирпич через отверстие
Пожалуйста,помогите написать 2 программы и объединить их....Плизззз,помогите...((Завтра уже нужно...

TASM - пройдет ли график функции через заданную точку
помогите с написанием программы для TASM определяющую, пройдет ли график функции y=5x2-7x+2 через...


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

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

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