РЕШИТЕ Задание по информатике! ПОЖалуйста! Срочно!
1. Вычислить произведение нечетных чисел от 40 до 160
2. Вычислить сумму чисел делящихся на 150 от 1500 до 3000
3.Определить кол-во чисел делящихся на 17 от 2510 до 7000
Решение прошу подробное. По паскалю.

Теперь знаю уже на 100%)

А лучше ИНОГДА ходить на занятия, чтобы знать, КАКОЙ ЯЗЫК ИЗУЧАЕТЕ

Так, отметил себе: ilia1975: не писать решений, может потом вынести мозг.

Бл, я уже точно знаю что я хочу , Напишите решение пожалуйста. Заранее Спасибо.

В Последний раз

1. k:=1;for i:=40 to 160 doif i mod 2 <>0 then k:=k*i;write(k);end.2. k:=0;for i:=1500 to 3000 doif i mod 150=0 then k:=k+i;write(k);end.3.k:=0;for i:=2510 to 7000 doif i mod 17=0 then k:=k+1;write(k);end.начало всех программ будет одинаковое:Program abc;var i,k:integer;begin