Дана таблица 6*4. Сформировать линейную таблицу В

@PAVEL_2 · Регистрация: 25.10.2019

Студворк — интернет-сервис помощи студентам

Дана таблица 6*4. Сформировать линейную таблицу В, где В(I) - среднее арифметическое положительных элементов I - строки.

@PAVEL_2 · 27.10.2019, 22:30 **[ТС]**

где именно ? перед выполнением действия

Добавлено через 15 минут
вот программа
uses crt;
var
a: array [1..6, 1..4] of real;
b: array [1..6] of real;
i,j,k : integer;
c:real;
begin
randomize;
writeln ('исходный массив А');
for i:=1 to 6 do
begin
for j:=1 to 4 do
begin
a[i,j]:=random(9);
write(a[i,j],' ' );
end;
writeln;
end;
writeln('------------------------------------------------------');
writeln('таблица В');
for i:=1 to 6 do
begin
for j:=1 to 4 do
begin
c:=a[i,j]+a[i,j]+a[i,j]+a[i,j] ;
end;
for k:=1 to 6 do
b[k]:=(c)/4;
write(b[k],' ' );
end;
end.

Добавлено через 34 секунды
там где- то ошибка сможешь найти

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@PAVEL_2 1 / 0 / 0 Регистрация: 25.10.2019 Сообщений: 69

	Дана таблица 64. Сформировать линейную таблицу В 27.10.2019, 20:25. Показов* 1750. Ответов 20 Метки нет (Все метки) Дана таблица 6*4. Сформировать линейную таблицу В, где В(I) - среднее арифметическое положительных элементов I - строки. 0

@PAVEL_2 1 / 0 / 0 Регистрация: 25.10.2019 Сообщений: 69
	27.10.2019, 22:30 [ТС]
	где именно ? перед выполнением действия Добавлено через 15 минут вот программа uses crt; var a: array [1..6, 1..4] of real; b: array [1..6] of real; i,j,k : integer; c:real; begin randomize; writeln ('исходный массив А'); for i:=1 to 6 do begin for j:=1 to 4 do begin a[i,j]:=random(9); write(a[i,j],' ' ); end; writeln; end; writeln('------------------------------------------------------'); writeln('таблица В'); for i:=1 to 6 do begin for j:=1 to 4 do begin c:=a[i,j]+a[i,j]+a[i,j]+a[i,j] ; end; for k:=1 to 6 do b[k]:=(c)/4; write(b[k],' ' ); end; end. Добавлено через 34 секунды там где- то ошибка сможешь найти 0