Карта сайта

Это автоматически сохраненная страница от 19.12.2013. Оригинал был здесь: http://2ch.hk/b/res/59221844.html
Сайт a2ch.ru не связан с авторами и содержимым страницы
жалоба / abuse: admin@a2ch.ru

Чтв 19 Дек 2013 18:21:30
Pascal-тред
Pascal-тредАноны, помогите решить программирование. Нужно решение через while.
1. В массиве есть хотя бы один отрицательный элемент. Вычислить произведение значений элементов до первого отрицательного элемента и сумму значений элементов после первого отрицательного элемента.
2. Даны два массива, определить, в каком из них заданный элемент встречается раньше.


Чтв 19 Дек 2013 18:23:00
бамп

Чтв 19 Дек 2013 18:25:25
>>59221844 Пиздец, это же ОЧЕНЬ просто, хуле ты такой тупой? Сажи поешь.

Чтв 19 Дек 2013 18:48:13
m:=1;
while (a>=0) do
begin
m:=m*a;
i:=i+1;
end;
i:=i+1;
n:=0
while (a &t;> nil) do
begin
m:=m*a;
i:=i+1;
end;

Это первая. Если голова на месте в чем я сомневаюсь, то поймешь, как заставить работать.

Чтв 19 Дек 2013 18:53:25
>>59223314
Очевидно, что рядом с a должен быть счетчик но макаба привет, абу его съела.
> m:=m*a;
А тут должно быть n:=n+a;


← К списку тредов