Страница 1 из 1

Плиз! Хэлп! Задача на псевдокоде

Добавлено: 15 дек 2009, 13:26
prettykatty
Помогите пожалуйста! надо решить, а не могу (((((
Найти среднее значение всех чисел, кратных 5 и расположенных на отрезке [M.N]
Заранее спасибо! чмоки!

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 15 дек 2009, 14:52
Хыиуду
Сделал на Паскале. mod - остаток от деления, div - деление без остатка.
if m mod 5<>0 then m:=(m div 5 + 1)*5;
n:=n div 5*5;
result:=(m+n)/2;

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 15 дек 2009, 15:07
prettykatty
Огромное спасибки!! :-*а можно еще одну задачку подкинуть?

Задан двумерный массив (таблица) М[1..n]. B[1..n] и фрагмент алгоритма, использующий одномерные массивы A[1..n]. B[1..n] и переменная х.
х:=0
нц для i от1 до n
A:=М[i.1]; B:=1
нц для j от1 до n
если М[i.j] < A
то A:=М[i.j]; B:=j
все
х:= х+ М[i.j]; вывод х
кц
кц


Исходные данные: n=4

м = 1 2 3 4
5 0 -2 1
8 -5 7 0
0 9 -8 6
А=4,2, -2,0
В= 8,7,5,9


Надо брату, я уще нефига не помню
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Найти наибольший общий делитель двух чисел Х и У, кратный 5.
Как?????????

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 16 дек 2009, 07:41
1nclude
Если я правильно понял условие задачи то:

Для входных данных X и Y положим:

1: X <- (X - (X mod 5))
2: Y <- (Y - (Y mod 5))
3: Z <- X mod Y
4: Если Z = 0 то выполнение прекращается - Y и есть НОД кратный 5
5: Иначе положим X <- Y, Y <- Z и перейдём к шагу 3

Вот как то так.

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 16 дек 2009, 09:53
prettykatty
Огромное Вам спасибо! Всего Вам наилучшего :-*

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 16 дек 2009, 10:46
Хыиуду
&quot писал(а):х:=0
нц для i от1 до n
A:=М[i.1]; B:=1
нц для j от1 до n
если М[i.j] < A
то A:=М[i.j]; B:=j
все
х:= х+ М[i.j]; вывод х
кц
кц

Заменяем
"нц для i от1 до n" на "for i:=1 to n do begin"
"если" на "if"
"то" на "then"
"кц" на "end;"
"то (что-то там) все" на "then begin (что-то там) end;"
"вывод х" на "writeln(x);"
Все :)

Re: Плиз! Хэлп! Задача на псевдокоде

Добавлено: 16 дек 2009, 11:09
prettykatty
Ребята, вы все ЗОЛОТО!!!! Огромное спасибо!!! Я вас вери ЛАВ!!!!