ShooterZXC S ShooterZXC Регистрация 21 Апр 2013 Сообщения 87 Репутация 0 Спасибо 0 Монет 0 2 Дек 2016 #1 Помогите составить программу в TurboPascal 7.0 с использованием массивов //otvet.imgsmail.ru/download/68615577_a4d574d231a0d13e2b8f2d79f0647719_800.jpg
Помогите составить программу в TurboPascal 7.0 с использованием массивов //otvet.imgsmail.ru/download/68615577_a4d574d231a0d13e2b8f2d79f0647719_800.jpg
аварит А аварит Регистрация 7 Апр 2013 Сообщения 86 Репутация 1 Спасибо 0 Монет 0 2 Дек 2016 #2 for i:=1 to 3 do for j:=1 to 4 do if a[i,j]=0 then b[i,j]:= 0 else b[i,j]:=2.1*a[i,j]; Позитивный голос 0
MAKSIS M MAKSIS Регистрация 27 Май 2013 Сообщения 96 Репутация 0 Спасибо 0 Монет 0 2 Дек 2016 #3 for i:=1 to 3 do for j:=1 to 4 do if a[i,j]=0 then b[i,j]:= 0 else b[i,j]:=2.1*a[i,j]; Позитивный голос 0