"Все сообщения пользователя katya"


Страницы: 1
две параболы
Пользователь: katya
Сообщений: 3
Статус: Пользователь
Зарегистрирован:
23 ноября 2008, 23:54
Был:24 ноября 2008, 5:17
katya
smsup 		Дата: 24 ноября 2008, 0:03 Сообщение №
Для этого нужно приравнять функцию, описывающую 1 параболу ко второй, получится уравнение с 1 неизвестным х.. решаешь... потом это х подставляешь в 1 из функций- находишь у... Найденные х и у- координаты точки пересечения...

Как заполнить масив в Паскале?
Пользователь: katya
Сообщений: 3
Статус: Пользователь
Зарегистрирован:
23 ноября 2008, 23:54
Был:24 ноября 2008, 5:17
katya
smsup 		Дата: 24 ноября 2008, 0:28 Сообщение №
Как заполнить масив в Паскале?
Пользователь: katya
Сообщений: 3
Статус: Пользователь
Зарегистрирован:
23 ноября 2008, 23:54
Был:24 ноября 2008, 5:17
katya
smsup 		Дата: 24 ноября 2008, 0:28 Сообщение №
program bilet08;
uses CRT;
var x,y,z:integer;
i:array[1..13] of integer;
begin
clrscr; randomize; gotoxy(1,10);
for x:=1 to 13 do begin i[x]:=random(75); write('| ',i[x],' |'); end;
z:=0;
for x:=1 to 13 do
begin
for y:=1 to 13 do
begin
if((i[x]=i[y])and(x<>y))then z:=1;
end;
end;
gotoxy(30,15); write('Repetitions: ');
if(z=0)then write('NO');
if(z=1)then write('YES');
readln;
end.

Страницы: 1