Var C:Array[1..8]of integer; i,n,m,max,k,el:integer;Beginrandomize;for i:=1 to 8 do beginc[i]:= random(20);write(C[i]:4);end;writeln;for i:=1 to 8 do beginc[i]:= c[i] * 10;write(C[i]:4);end;end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
