Напишите программу, которая выводит номера билетов…

Question

Напишите программу, которая выводит номера билетов, чтобы они не повторялись

Answer 1

34

albeg

06 марта 2023

Я так понимаю намера билетов надо вывести в случайном порядке? Пусть надо вывести в случайном порядке номера 100 билетовprogram RND; var a: array[1… 100]of integer; i.j,f: integer; beginrandomize; i: =1; white i<101 do beginf: =0; A[i]: =int (random (100); for j: =1 to i do if A[j]=A[i] then f: =1; if f=0 then i: =i+1; end; for i: =1 to 100 do writeln (A[i]); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: