Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
процедуры в паскале
Описать процедуру, которая вычисляет разницу элементов двух одномерных массивов. пожалуйста!!!!!!!
1 | Автор: baizhik_street | 2010-11-22, 22:54   |  Репутация: [ + 0 ]
Code

cons N=5
var mas1,mas2: array of [0..n] of byte;
//пропущенно заполнение массивов
procedure submas;
var i: byte;
begin
   for i:=0 to n do
     write((mas1[i]-mas2[i])+'; ');
end;
2 | Автор: Fireleo | 2010-11-23, 01:46   |  Репутация: [ + 30 ]
  • Страница 1 из 1
  • 1
Поиск: