Скажи один и ли несколько вариантов ответов в разветвление каждая команда а)выполняется только один - id875121520220602 от денис1095 02.06.2022 12:26

Question

Информатика: Скажи один и ли несколько вариантов ответов в разветвление каждая команда а)выполняется только один раз б) выполняется несколько раз в) может выполнять несколько раз г) выполняется не больше, чем один раз д) может выполняться несколько раз или может быть невыполненниной ни разу

денис1095 · Accepted Answer

{Attention! Это самое отвратное моё решение на Знаниях. Запаситесь валерьянкой перед прочтением кода} //Pascal ABC.NET 3.1 сборка 1219 Type  ty=record  valu:integer;  count:integer; end; Const  n=3;  Var  ma:array[1..n,1..n] of integer;  tyar:array of ty;  se:set of integer;  i,j,z,k,MaxCount:integer; begin  randomize;  se:=[];  k:=0;  MaxCount:=integer.MinValue;  writeln( Matrix: );  for i:=1 to n do   begin    for j:=1 to n do     begin      ma[i,j]:=random(-10,10);      write(ma[i,j]:4);    ...

MOGZ ответил