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

Мне с . делайте хоть что-нибудь, только правильно.

👇
Открыть все ответы
Ответ:
HerobrineLifeYT
HerobrineLifeYT
27.03.2022
1. Почему работа компьютера невозможна без операционной системы? 
Потому что операционная система дает игроку весь возможносный инструментарий. Много ли вы сможете наработать на выключенном компьютере?
2. Какие операционные системы вы знаете?
Windows (95,98, ME, XP, 7, 10), Android, Linux, MacOS
3. Какие программы, кроме операционной системы, относятся к системному ПО? Драйвера, антивирусы, 

4. Какие системы программирования вам известны?
Pyton, C++
5. Для специалистов какой профессии предназначены системы программирования?
Программист, Специалист в области кибербезопасности
4,4(91 оценок)
Ответ:
11Аслан11
11Аслан11
27.03.2022
Const nmax=20;var a:array[1..nmax,1..nmax] of integer;    m,n,i,j,k,l,p:byte;begin
randomize;repeatwrite('Количество строк до ',nmax,' n=');readln(n);until n in [1..nmax];repeatwrite('Количество столбцов до ',nmax,' m=');readln(m);until m in [1..nmax];writeln('Исходная матрица:');for i:=1 to n do begin   for j:=1 to m do    begin     a[i,j]:=random(100);     write(a[i,j]:4);    end;   writeln; end;writeln;k:=0;{наличие нужного столбца}j:=1;while(j<=m) and(k=0) do{идем по столбцам} begin  p:=0;{наличие совпадений}  for i:=1 to n-1 do{идем вниз по столбцу}  for l:=i+1 to n do{смотрим впереди}  if a[i,j]=a[l,j] then p:=1;{если одинаковые, фиксируем}  if p=1 then k:=1{есть столбец}  else j:=j+1;{нет, смотрим следующий} end;if k=1 then write('Столбец с одинаковыми элементами есть')else write('Столбца с одинаковыми элементами нет');readlnend.
4,6(55 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ