Програмы Паскаль

[Stima]

Здраствуте Програмисты, мне нужна очень ваша помощь.... Есть несколько задачь, мне очень нужно их решение с помощью Паскаль. Прошу очень о помощи, ети програмы мне нужны в протяжении двух дней!!!!!!!!!

1."Дан двумерный массив целых чисел. Определить:
б) разницу между максимальным и первым элементом массива;"

2.Дан массив. Составить программу
б) расчета среднего арифметического двух любых элементов массива

3.В массиве хранится информация о количестве побед одержанных 20 футбольными командами. Определить номера команд, имеющих меньше трех побед.

4. Дан массив целых чисел. найти
б) сумму элементов, кратных заданному числу

[p51x]

И чев вам помочь? Написать за вас? Тогда вам во фриланс.

[noxin]

4. Дан массив целых чисел. найти
б) сумму элементов, кратных заданному числу

s := 0;
for i := 1 to n do
  if a[i] mod x = 0 
    then s := s+a[i];

3.В массиве хранится информация о количестве побед одержанных 20 футбольными командами. Определить номера команд, имеющих меньше трех побед.

for i := 1 to 20 do
  if a[i] < 3 
    then writeln(i);

[kakawkin]

program tt;
const n=7;
var a:array [1..n] of integer;
     frst,max,i,x:integer;
begin
 for i:=1 to n do
  begin
   write('a[',i,']=');
   readln(a[i]);
  end;
 frst:= a[1];
 max:=1;
 for i:=1 to n do
  if a[max] < a[i]
   then max:=i;
 writeln('Первый элемент = ', frst);
 writeln('Максимальный элемент = ', max);
 if frst>max then x:=frst-max else x:=max-frst;
 writeln('Разница первого и максимального эл-та в ',x,' едениц');
end.

[Stima]

Сообщение от p51x

И чев вам помочь? Написать за вас? Тогда вам во фриланс.

Люди вы меня канечно извените, но просто я на ету тему не чего непонемаю, и прошу вас о помощи зделайте проги, токо полностью....... Або подскажыте где ето могут зделать!!!!!!!!!!!!! Плиз!!!!!!

[Google2010]

где ето могут зделать!

icq 553-566-179 недорого

[Grag]

Сообщение от Stima

Або подскажыте где ето могут зделать!!!!!!!!!!!!! Плиз!!!!!!

И здесь тоже!

Готов решить Вашу задачу.

С моим резюме и портфолио можно ознакомиться в соответствующих разделах на моем сайте:
http://igor-bachin.narod.ru
или вот по этим ссылкам:
http://www.autsorser.ru/index.php?action=rsm&user=59
http://www.autsorser.ru/index.php?action=prtfl&user=59

Контакты:
e-mail: skiper@rol.ru
icq: 585281783
Skype: delmas61