@ddds3

народ помогите решить задачи вообще не получается....
1. Напишите программу, находящую в двухмерном массиве номера строк с наибольшей суммой элементов.
2. Найти наименьший из положительных элементов массива Х[1..10].
3. Из массива В[1..8] уберите все отрицательные элементы, заменив их на значения предыдущих элементов.
4. Напишите программу определения количества элементов, удовлетворяющих условию 0<А[i],i в целочисленном массиве А[1..10].
5. Для линейного целого массива A[1..N] найти сумму всех: а) четных элементов; б) нечетных элементов; в) элементов, кратных 3.
6. Элементы одномерного вещественного массива X[1..N] вычисляются следующим образом: X[1]=1, X[2]=2,...,X[k]=k*X[k-1]+X[k-2], k=3,...,N. Составьте программу вычисления элементов массива X

0

@Мать

2) uses crt;
var a:array [1..10] of integer;
i,min: integer;
begin
clrscr;
randomize;
for i:=1 to 10 do
begin
a[i]:=random(15)-5;
write(a[i]);
end;
writeln;
min:=a[1];
for i:=1 to 10 do begin
if (min>a[i]) and (a[i]>=0) then min:=a[i];
end;
writeln (min);
readln;
end.

1

@ddds3

спасибо выручили

0

@Мать

Да не за что....извини правда остальные тоже хотела написать, но пока времени вообще нет....

0

@ddds3

мне бы еще 4 и 1 так вообще сказка бы была

0

@Мать

Добавлено через 52 секунды
вот 4 задачу попробуй...правда написала сейчас быстро без паскаля

0

@SuPeR XaKer

#2
ну и как? работает?

0

@Мать

а что смешного? разве по твоему мнению не должна она работать?

0

@SuPeR XaKer

Ну как видиш нет.

0

@Мать

я только что на паскале перепроверила, все она правильно считает....перепроверь....

0

@SuPeR XaKer

Не ты попробуй когда первое число отрицательное а не так.

0

@ddds3

cогласен работает она все хорощо спс

Добавлено через 37 секунд
все нормально работает она хорошо спс

Добавлено через 2 минуты
согласен работает

0

@Мать

Я уже со всех сторон её проверила.....Дак что супер хакер не ври...не за что....

0

@ddds3

помогите ещ плз 1 или 6

0

@Мать

Сегодня уже не могу если время будет завтра постараюсь....

0

@SuPeR XaKer

ой что ты что ты.У меня глюки?да?Ну ты Мать даёшь. это я очевидно в фотошопе нарисовал. И я ещё и вру...

Миниатюры

 

0

@Мать

Хорошо...почему тогда у нас работает??? Может ты в написании описался....Или потому что оболочки разные?

0

@SuPeR XaKer

сделай ручной ввод.И введи такие значения как у меня.Она ни где так не будет работать.Тут дело в логи а не в коде а в логике.

0

@Мать

Хорошо я завтра постараюсь проверить...сейчас просто правда времени нет.... :-))) Просто по идее странно какая разница ручной ввод или автоматический случайный....ладно завтра посмотрю...

Добавлено через 44 секунды
И вообще тогда какой вариант твоего решения?

0

@SuPeR XaKer

да дело не в вводе.Я повторяюсь логика.
найти индекс первого положительного и с этим элементом сравнивать положительные элементы.Вот одно из верных решений.

0