Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Помогите решить плиз

Автор: nblazhko 10.11.2007 21:20

Вот такие задачи:
1.Описать функцию,которая возвращаетномер позиции первого(слева) вхождения в запись числа типа Longint цифры k(k [0,9]).

2.Использовать подпрограммы (ввода,вывда,обрабатывающей части).Даны 3 матрицы целых чисел: (4*3), (4*4), (3*3). Распечатать ту из них,в которой находиться максимальный из отрицателных элементов матриц.Считать что такая матрица одна.

P.S. Поиском не нашел

Автор: Lapp 11.11.2007 16:36

Цитата(nblazhko @ 10.11.2007 17:20) *

P.S. Поиском не нашел
А сам что сделал? Покажи. Поможем.

В первой можешь использовать вот такую конструкцию:
  i:=0;
while n>0 do begin
if n mod 10=k then i:=1 else if i>0 then Inc(i);
n:=n div 10
end;

Это, конечно, если не пользоваться процедурой Str smile.gif