Привидите пример, результат тестового выполнения программы: Program Example:
var I:integer;
begin
for I:=1 to 10 do
write (random (50):4)
end.​

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку