27 баллов!!! Больше не имею!!! Пожалуйста помогите!!!
5-9 класс
|
Проблема: Надо создать программу в Паскаль который смог бы найти сумму элементов в каждом столбце. Это программа с Matrice и по моему с For.
Помогите пожалуйста, заранее спасибо!!!
program dan777;
const n=5;
var a:array[1..n,1..n] of integer;
b,c,k:integer;
begin
for b:=1 to n do
for c:=1 to n do begin
a[b,c]:=random(20);
write(a[b,c]:3);
if c=n then writeln;
end;
for c:=1 to n do
for b:=1 to n do begin
k:=k+a[b,c];
if b=n then begin
writeln('Сумма',c,'-о столбца=',k);
k:=0;
end;
end;
end.
const n=?; m=?; {Размерность матрицы, вместо "?" ввести числа}
Var a:array[1..n,1..m] of integer;
s,i,j:integer;
Begin
randomize;
for j:=1 to m do
for i:=1 to n do
a[i,j]:=random(-100,100); {Заполняем матрицу случайными числами от -100 до 100, можно вписать любой промежуток}
for i:=1 to n do
begin
s:=0;
for j:=1 to m do
s:=s+a[i,j];
writeln('Сумма элементов ',i,'-го столбца равна ',s);
end;
End.
Другие вопросы из категории
система команд исполнителя вычислителя состоит из двух команд:
1-прибавить 2;
2-умножить на 3;
Составьте для вычислителя содержащего не более 6 команд алгоритм получение из числа 2 число 50
Константин) и отчество ('б' — Борисович или
файлов из этого списка,соответствующих запросу Письм*.?*
а)6
б)0
в)2
г)1
составьте программу, проверяющую истинность утверждения "введенный с клавиатуры год относится к 21 веку". оформите вывод данных на экран, используя возможности модуля CRT.
Наподобие этого
Читайте также
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!
обезьяна, курица, собака и свинья. Зная, что 1984 год был годом мыши, написать программу, выводящую номер года и его название.
Учитель сказал, что это решается через кейс..Только как.ПОЖАЛУЙСТА, ПОМОГИТЕ!!!!!!!!!!
1) исключи лишнее:
а)микрофон, б)колонки, в) наушники , г) монитор
2)исключи лишнее:
а)процессор, б) монитор, в)клавиатура, мышь
3)установите соответствие. Устройство ПК:
1. клавиатура
2. модем
3.центральный процессор
назначение устройств:
а)передача цифровой информации через каналы связи
б)хранение информации
в)обеспечение общего управления ПК, осуществление вычислений по программе, хранящейся в оперативной памяти
г)визуальное отображение информации, находящейся в оперативной памяти
д)ввод алфавитно-цифровых символов
6.Раздели на группы и дай название каждой группе:
а)принтер,б)сканер,г)мышь,д)проектор,е)веб камера,ж)процессор,з)колонки,и)микрофон, к) монитор
Пожалуйста помогите очень срочно.
Раньше у меня был комп, он был ну оооочень старый где то 2002г. Так вот, я решила скрыть папку со своими фотографиями и после этого я не смогла ни где их найти.
Пожалуйста помогите! Что сделать чтобы вернуть папку.
ЭТО ПРАВДА ОЧЕНЬ НУЖНО И ЧЕМ БЫСТРЕЕ, ТЕМ ЛУЧШЕ)
Объясните, пожалуйста, как мне сделать эти номера)
У меня на компьютере все папки есть, которые требуют в заданиях ( я про каталог Антона Павловича Чехова и т.д.), но только я понятия не имею, как это делать:(
Объясните, пожалуйста, если не сложно, конечно)
ЭТО СРОЧНО НУЖНО)