Составить на языке Турбо Паскаль программку обработки строк

[Wenia]

Составить на языке Турбо Паскаль программку обработки строк

Ох, помогите пожалуйста, не понимаю я эти задачки :tehnari_ru_325:
Я сама гуманитарий, с информатикой всегда беда была, а тут задали эту работу, сижу мучаюсь теперь :tehnari_ru_121:

В меню обязательно должны быть эти пунктики:
1) ввод и обработка символьной строки с выводом результатов; (задача №1)
2) ввод и обработка двумерного массива с выдачей результатов;(задача №2)
3) выход из программы (с подтверждением).

Алгоритмы задач 1 и 2 оформить в виде процедур или функций, внутренних по отношению к главной программе.

№1 Ввести строку и сформировать из инвертированных её слов новую строку.
№2 Ввести матрицу и определить, во сколько раз максимум больше абсолютной величины минимума.

Нужно, чтоб матрицу и число строк/столбцов смогла вводить сама.))
И нужно сделать так, что бы матрица вводилась в ручную, а не заполнялась рандомом.
Будьте няшечками - помогите написать прогу )) tehno002

 

[Vladimir_S]

Будьте няшечками - помогите написать прогу ))

Да, пожалуй, Вы правы - какая уж из меня "няшечка", раз выданное Вам решение задачи http://www.tehnari.ru/f41/t81255/ Вас не устраивает категорически, причем без малейшего объяснения причин. Ну что же, ждите решения от "няшечки". А если "няшечка" запоздает, и всё же придется воспользоваться моей программой, то так: в конце процедуры Matrix_Game нужно сделать вставку:

Writeln;
 Writeln('Minimal element is A[',Imin,',',Jmin,']=',A[Imin,Jmin]);
 Writeln('Maximal element is A[',Imax,',',Jmax,']=',A[Imax,Jmax]);
[COLOR=Red][B] If A[Imin,Jmin]<>0 then
  Writeln('Max/Min ratio= ',A[Imax,Jmax]/ABS(A[Imin,Jmin]):0:3);[/B][/COLOR]
 Writeln;
end;

Пламенный привет "няшечке", которая справится с задачей лучше меня.

 

[Wenia]

Vladimir_S, ты няшечка))) =*
И не обижайся, та задача меня устроила и очень помогла)))
Просто моя подруга-однокурсница тоже не понимает ничего в информатике, а эти задачи раздали каждому в группе, но варианты у всех разные(( Вот и она попросила меня написать на форум, с просьбой о помощи от моего имени, ибо она ужа сюда писала, но ей никто не ответил(
Так что давай без обидок)) Ты няшечка и я тебе очень благодарна за помощь!)) =*** tehnoangel

 

[Léon1]

Так что давай без обидок)) Ты няшечка и я тебе очень благодарна за помощь!))

Жесть...
Вот это обращение, прям как с другом...

 

[Wenia]

Жесть...
Вот это обращение, прям как с другом...

И что тут такого "жесть"?
Я тут со всеми так разговариваю И я правда благодарна Vladimir_S, за то что он уже во второй раз меня выручает))

 

[Vladimir_S]

Жесть... Вот это обращение, прям как с другом...

Да ладно Вам, Анжелика... ну няшечка, так няшечка, значит, буду няшечкой.