Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Asm для начинающих > Помогите пожалуйста сделать вставку

Автор: Feroce 17.5.2009, 17:22

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

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

Цитата(Feroce )

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

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

Автор: Feroce 18.5.2009, 12:27

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

Автор: Mikl_ 18.5.2009, 13:38

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

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

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

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

Автор: Feroce 18.5.2009, 15:24

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

)

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

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