преобразовать с Паскаля на питон, заранее program Matrix66;
type
matrix = array [1..10,1..10] of integer;

var
a:matrix;
Column, M, N, i, j:Integer;

procedure DelMatrixColumn(var mat:matrix; X:Integer);
var
i:integer;
begin
if x>0 then
begin
N:=N-1;
for j:=X to N do
for i:=1 to M do
mat[i,j]:=mat[i,j+1];
end;
end;

begin
Write('N: ');
Readln(N);
Write('M: ');
Readln(M);

for i:=1 to M do
begin
writeln(i,': ');
for j:=1 to N do
begin
Write(j,' : ');
Read(a[i,j]);
end;
end;

Column:=0;
for j:=1 to N do
begin
i:=1;
while ((i<=M) and (a[i,j]<0)) do inc(i);
if i=M+1 then Column:=j;
end;

DelMatrixColumn(a,Column);

for i:=1 to M do
begin
for j:=1 to N do
begin
Write(' : ',a[i,j]);
end;
writeln(' : ');
end;
end.

Контрольная работа по теме

«Компьютер как универсальное устройство обработки информации»

(информатика; 7 класс)

1. Как компьютер человеку в его ДЕЯТЕЛЬНОСТИ? КОМПЬЮТЕР НЕ МОЖЕТ НАЙТИ НЕПОНЯТНУЮ ЕМУ ИНФОРМИЦИЮ БЛАГОДОРЯ ЭТОМУ КОМПЬЮТЕР ОБЛЕГЧАЕТ ЖИЗНЬ ЧЕЛОВЕКУ

2. Какие устройства входят в состав компьютера и зачем они НУЖНЫ? МЫШКА ЧТОБЫ ДВИГАТЬ КУРСОРОМ SSS КЛАВИОТУРА ДЛЯ ПИЧАТАНЬЯ ЧЕГО ЛИБО,SSS ЖЁСТКИЙ ДИСК НА НЕМ ХРОНЯТСЯ ФАЙЛЫ, ДАННЫЕ, ИЗОБРАЖЕНИЯ И Т. Д.

3. Перечислите устройства ввода ИНФОРМАЦИИ SSS КЛАВИОТУРА МЫШКА КУРСОР

4. Перечислите устройства вывода ИНФОРМАЦИИ SSS Ы

ФЛЕШКА ЖЁСТКИЙ ДИСК

5. Из каких частей состоит имя ФАЙЛА? SSS ПРОСТИ ТУТ Я НЕ ЗНАЮ

6. Как по имени файла определить в какой программе он СОЗДАН? SSS ТАМ НАПИСАН САЙТ И СЫЛКА

7. В чём состоит различие между одноуровневой и иерархической файловой СИСТЕМАМИ? SSS НЕ ЗНАЮ СОРИ

8. Перечислите основные типы программного обеспечения компьютера. Приведите примеры ПО по типам. SSS ИНТЕРНЕТ БЫСТРЫЙ ПОИСК (ЧЕГО-ЛИБО) СОТ СЕТИ

9. К каким последствиям может привести заражение компьютера ВИРУСАМИ? SSS СБРАШЕВАНИЕ ДАННЫХ МОМЕНТАЛЬНАЯ СЕВШАЯ БАТАРЕЯ И И ЗАХВАТЫВАНИЕ АККАУНТА

10. Какие типы компьютерных вирусов СУЩЕСТВУЮТ? SSS НЕЗНАЮ

11. Каким антивирусные программы обнаруживают ВИРУСЫ? ОНИ СКАНИРУЮТ ВСЕ ПРОГРАММЫ И ЕСЛИ В ПРОГРАММЕ НЕ НОРМАЛЬНАЯ ОШИБКА ОНИ СРАЗУ ПИШУТ И ОБНАРУЖИВАЮТ

Объяснение:

СДЕЛАЙ ОТВЕТ ЛУТШИМ Я СТАРАЛСЯ

Сфе́ра — геометрическое место точек в пространстве, равноудаленных от некоторой заданной точки. Расстояние от точки сферы до её центра называется радиусом сферы. А шар

Шар — геометрическое тело; совокупность всех точек пространства, находящихся от центра на расстоянии, не больше заданного. Это расстояние называется радиусом шара. Шар образуется вращением полукруга около его неподвижного диаметра

Объяснение:

И смотри: Сфера это место точек, а шар это тело.

И ещё сфера имеет пощадь но, но он не имеет объема. А шар наоборот. поэтому я не могу их подразумевать как одинаковые