Подскажите пожалуйста пример программы генерирования паролей на 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
Флорентий
Эмблема операционной системы ...
2019-01-22 03:15:03
Шеховцов
Что может получиться соиденяя эти точки? ...
2019-01-22 03:10:38