VPF::Помогите пожалуйста сделать вставку

Feroce

Дата 17.5.2009, 17:22 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 17.5.2009

Репутация: нет
Всего: нет

Здравствуйте!
Мне надо в совсем несложную задачу на Паскале сделать вставки.
задача:  найти среднее арифметическое чисел одномерного массива.
Помогите, пожалуйста))
Желательно с комментариями {ничего не понимаю...стыдно(((((}

program assemblery;
type mass= array [1..100] of integer;
var a: mass;
    i,n,s:integer;
    sa:real;
Begin
  randomize;
  writeln ('vvedi kol-vo 4isel massiva',n);
  readln(n);
  for i:=1 to n do
  begin
   a[i]:=random(10);
   write(a[i],' ')
  end;
  s:=0;
  for i:=1 to n do s:=s+a[i];
  sa:=s/n;
  writeln('srednee arifmti4eskoe=',sa:5:3);
readln
end.
Код

Mikl_

Дата 18.5.2009, 05:05 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 537
Регистрация: 9.11.2007

Репутация: 8
Всего: 14

Цитата(Feroce )

Мне надо в совсем несложную задачу на Паскале сделать вставки.

А в чем проблема? В Паскале ассемблерная вставка начинается служебным словом asm и заканчивается служебным словом end

Это сообщение отредактировал(а) Mikl_ - 18.5.2009, 05:08

Feroce

Дата 18.5.2009, 12:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 17.5.2009

Репутация: нет
Всего: нет

Ну а как она сама выглядеть то будет?
Её надо составить...

Mikl_

Дата 18.5.2009, 13:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 537
Регистрация: 9.11.2007

Репутация: 8
Всего: 14

Feroce, так об этом писать нужно smile

Цитата(Правила форума "Asm для начинающих")

Телепатов на форуме нет! Задавайте чёткий, конкретный и полный вопрос.

Так и так напишите за меня на ассемблере вычисление среднего арифметического... Тогда при чем здесь ассемблерная вставка? Где должна проходить граница между Паскалем и Ассемблером? И для домашних заданий, курсовых, существует "Центр Помощи".Форум -> Vingrad -> Vingrad - Колледж -> Центр помощи smile

Feroce

Дата 18.5.2009, 15:24 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 9
Регистрация: 17.5.2009

Репутация: нет
Всего: нет

Цитата(Mikl_ @ 18.5.2009, 13:38

)

Так и так напишите за меня на ассемблере вычисление среднего арифметического...

Вот именно, что не на Ассемблере её надо делать! А на Паскале...а что именно не важно, лишь бы было...
можно сумму просто посчитать, можно прям полностью среднее арифметическое...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Asm для начинающих \| Следующая тема »