Что получится в результате выполнения программы ? Program variant2; Const n=12; Type myarrey=Arrey[1..n] of Integer; Car C;myarrey; I:Bite;p:integer; Begin P;=0; For I:=1 to n do Begin C[i]:=-25+random(71); If c(i)mod3=0 then p:=p+1; End; Writeln (p); Reading; End.
Получится множество сообщений об ошибках. А если программу исправить, например, как приведено ниже, будет выведено некоторое случайное число.Program variant2;Const n=12;Type myarrey=Array[1..n] of Integer;var C:myarrey;I:Byte;p:integer;Begin P:=0; For I:=1 to n do Begin C[i]:=-25+random(71); If (c[i] mod 3)=0 then p:=p+1; End; Writeln (p);End.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Что получится в результате выполнения программы ? Program variant2; Const n=12; Type myarrey=Arrey[1..n] of Integer; Car C;myarrey; I:Bite;p:integer; Begin P;=0; For I:=1 to n do Begin C[i]:=-25+random(71); If c(i)mod3=0 then p:=p+1; End; Writeln (p); Reading; End.» от пользователя ВЛАД СОМЧУК в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!