М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
GravityFalls12
GravityFalls12
16.11.2022 15:57 •  Информатика

1) Что такое растровая графика? *
1.В памяти компьютера сохраняется информация о геометрических объектах, составляющих изображение
2.В памяти компьютера сохраняется информация о цвете каждого входящего в него пикселя
3.В памяти компьютера хранится математическая формула (уравнение), по которой строится изображение

👇
Открыть все ответы
Ответ:
tonia8
tonia8
16.11.2022

y, x = map(int, input().split()) #Размеры матрицы, если матрицы имеет квадратную форму, то просто y = x = int(input())

matrix = [list(map(int, input().split())) for i in range(y)] #Заполняем матрицу

ans = [sum(matrix[k][i] for k in range(y)) for i in range(x)] #Находим сумму каждого столбца

print(*ans) #Выводим эти суммы

P.S. Комментарии убери, иначе не будет работать

P.S.S. Версия без коментариев и пример работы:

y, x = map(int, input().split())

matrix = [list(map(int, input().split())) for i in range(y)]

ans = [sum(matrix[k][i] for k in range(y)) for i in range(x)]

print(*ans)

Ввод:

3 4 #Размер

3 4 5 6 #Матрица

1 2 3 4

1 1 1 1

Вывод:

5 7 9 11

4,8(28 оценок)
Ответ:
kalinkamalinka369
kalinkamalinka369
16.11.2022
Program TaskC;
Var i, il: Integer;
Begin
For i := 1 To 21 Do
If i Mod 2 = 1 Then
Write(i, ' ');
i := i + 1;
End;
ReadLn;
End.

Program TaskD;
Var i: Integer;
Begin
For i := 1 To 11 Do
Write(i * 2, ' ');
End;
ReadLn;
End.

Program TaskE;
Var i: Integer;
Begin
For i := 10 DownTo 1 Do
Write(i, ' ');
ReadLn;
End.

Program TaskF;
Var i: Integer;
Begin
For i := 10 DownTo 1 Do
Begin
Write(i * 10, ' ');
End;
ReadLn;
End.

Program TaskG;
Var i, sum: Integer;
Begin
For i := 1 To 10 Do
sum := sum + i;
WriteLn(sum);
ReadLn;
End.

Program TaskH;
Var i, product: Integer;
Begin
product := 1;
For i := 1 To 5 Do
product := product * i;
WriteLn(product);
ReadLn;
End.

Program TaskI;
Var i, sum: Integer;
Begin
For i := -5 To 5 Do
sum := sum + Abs(i);
WriteLn(sum);
ReadLn;
End.

Program TaskJ;
Var c: Char;
Begin
For c := 'A' To 'Z' Do
Write(c, ' ');
ReadLn;
End.
4,7(21 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ