Паскаль. Задачи. (Графика, БД, строки)

[bill]

1. надо на паскале. Там написано
2. inttostr and strtoint в паскале нет. есть val, str,chr.
3. Даю обьяснения функций, описаных в №2. см. вложение.

[Cantana]

Bill у тебя вложение №2 не полная
а inttostr убери и попробуй по листат книжку по паскаль там надо найти как integer вывести с помошью Writeln(), там есть просто я щас не помню
а алгоритм вроде правильный че там не понятно спрашивай .

[bill]

1. Не помню чтобы в классическом паскале были inttostr and strtoint.
Но в современных компиляторах эти функции есть.
2. В тему-strtoint написана с помощью упомянутой val, a inttostr -str.
Во всяком случае нас заставляли знать(а значит использовать) все эти функции и процедуры. Ну а как уж автору темы- я не знаю,я просто попытался ответить на вопрос.

[Cantana]

Сообщение от bill

1. Не помню чтобы в классическом паскале были inttostr and strtoint.
Но в современных компиляторах эти функции есть.
2. В тему-strtoint написана с помощью упомянутой val, a inttostr -str.
Во всяком случае нас заставляли знать(а значит использовать) все эти функции и процедуры. Ну а как уж автору темы- я не знаю,я просто попытался ответить на вопрос.

я не говорю что inttostr есть в классическом паскале, а на счет пролистания книжки я извиняюс не достоточно был внимателен и перепутал с автором темы. еще раз сорри .

[Nadi]

Помогите, пожалуйста! Никак...=(

Составить программу обработки массива данных по расходу электроэнергии пятью предприятиями города. Строки массива содержат данные по каждому предприятию, столбцы – данные о плановом и фактическом объемах потребления электроэнергии. Определить предприятия, которые имеют перерасход электроэнергии и предприятие с максимальным перерасходом.

[ReYDaN]

А мне ктонить поможет с решением задачки?
найти и вывести на печать все простые числа (те,которые делятся только на себя и 1)
Алгоритм решения:
1.вывести 1,2,3
2.запустить цикл, перебивающий подряд все числа с 4 до 100
3.проверять последовательно при помощи функции Frac (x/__)>0
имеется ли дробная часть при делении на 2,3,5,7,11,13
if Frac (x/2)>0 or Frac (x/3>0 or Frac (x/5>0 or ...
then Label5.Caption:=Label5.Caption+Floa ttostr(x);
4.Если есть остаток - то выводим на печать, нет-берем следующее число.


ЗАРАНИЕ СПАСИБО!!!

[MacOSUser]

1 не считается простым числом.

Поподробнее: что использовать, массивы, множества, функции и т.д. А то как всегда напишешь, а потом автор вдруг говорит "мы это не изучали и нужно как-нибудь переделать, чтоб в рамках нашей программы". А мы должны были откуда-то это знать.