Помогите решить карточку по Икт
1. Правильно ли описан массив А? Если нет, то что надо изменить?
Type odmyarray[1..n+20] Of integer;
Var A : odmyarray;
2. Что получится в результате выполненя программы?
Program Variant3;
Const n=17;
Type myarray=Array[1..n] Of Integer;
Var B : myarray;
i: Byte ; p : Integer;
Begin
B[i] :=-35+Random(121);
If C[i] Mod 10=0 Then p:=p+1;
End;
Writeln(p);
Readln;
End.
Не тот ответ, который вам нужен?
Найди нужный
Самые новые вопросы
Другие предметы - 8 месяцев назад
Информация
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.
