Лабы по Инфе

Саф

Дата: Среда, 2006-09-20, 10:04 PM | Сообщение # 1

Рядовой

Группа: Пользователи

Сообщений: 6

Репутация: 1

Статус: Offline

По просьбе админа выкладываю имеющиеся лабы

Добавлено (2006-09-20, 10:04 Pm)
---------------------------------------------
Итак Лаба N2 за 25ым номером по журналу:
Вычислить Z=x-y если x>y и z=y-x если x<=y

Тут должны быть списки моих чаров,ссылки к сайтам или просто умные фразы......но зачем?

Goran

Дата: Среда, 2006-09-20, 10:11 PM | Сообщение # 2

Админ

Группа: Администраторы

Сообщений: 56

Репутация: 4

Статус: Offline

Program Problem1;
uses crt;
var x,y,z: integer;
begin
clrscr;
writeln('Введите x: '); readln( x ) ;
writeln('Введите y: '); readln( y ) ;
if x>y then z:=x-y else z:=y-x;
write('z= ' ); write(z);
readkey;
end.

-What is the Gerber?
-...Gerber is... MUST DAY!!!

Саф

Дата: Среда, 2006-09-20, 10:26 PM | Сообщение # 3

Рядовой

Группа: Пользователи

Сообщений: 6

Репутация: 1

Статус: Offline

N3 за 25ым по журналу:
Даны действительные числа x и y. Определить принадлежит ли точка с координатами
x,y замкнутой фигуре.ограниченой кривыми y=e^-2,y=e^2,y=x^2

Добавлено (2006-09-20, 10:26 Pm)
---------------------------------------------
N4 за 25ым по журналу:
Пусть a0=a1=1,a1=a1-2+1\1+-1\1, 1=2,3....
найти произведение a0*a1*a2.....a44

Тут должны быть списки моих чаров,ссылки к сайтам или просто умные фразы......но зачем?

Goran

Дата: Вторник, 2006-10-24, 11:58 PM | Сообщение # 4

Админ

Группа: Администраторы

Сообщений: 56

Репутация: 4

Статус: Offline

Таг! Значит появилась первая лаба по Паскалю. Пока там всё свалено в кучу, но надеюсь будет время и я всё рассортирую.

-What is the Gerber?
-...Gerber is... MUST DAY!!!

Goran

Дата: Среда, 2006-10-25, 6:14 PM | Сообщение # 5