Подскажите пожалуйста пример программы генерирования паролей на Pascal
108
ОТВЕТЫ
uses crt;
var s:string;
i,k:byte;
begin
randomize; s:=;
for i:=1 to 10 do
begin
repeat
k:=48+random(75);
until k in [48..57,97..122];
s:=s+chr(k);
end;
write(s);
end.
var s:string;
i,k:byte;
begin
randomize; s:=;
for i:=1 to 10 do
begin
repeat
k:=48+random(75);
until k in [48..57,97..122];
s:=s+chr(k);
end;
write(s);
end.
208
Отв. дан
Drelath
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Thozan
2019-01-22 03:20:17
Феодорович
Превратите одно слово в другое, всякий раз заменяя по ...
2019-01-22 03:17:01
Гавриил
Повтори 5 [Вперёд 80 Направо 60]
какая фигура получится? ...
2019-01-22 03:09:07
Каллист
Здравствуйте! помогите пожалуйста решить задание по информатике часть 1 ...
2019-01-22 03:08:58