Меню сайту

Пошук

Наше опитування
Оцінка сайту Відмінно Добре Непогано Погано Жахливо Результати \| Архів опитувань Всього відповідей: 1092

Що нового?

Форма входу

Міні-чат
Щоб додати необхідна авторизація

Пароль

Скласти програму здійснення доступу за паролем (вхід за вгаданим паролем, 5 спроб, пароль 7, але за потреби можна міняти):
program parol;
var y,x,n,i: integer;
begin
y:=7;
for i:=1 to 5 do
begin
writeln ('vvedit parol');
readln (x);
if x=y then
begin
writeln ('pravelno');
exit;
end
else
writeln ('nevirno');
end;
i:=i+1;
writeln ('sprob bilshe nemae');
readln
end.

Статистика
Онлайн всього: 1 Гостей: 1 Користувачів: 0

Календар

Архів записів

Друзі сайту

Створити безкоштовний сайт на uCoz

Довідник для учнів та студентів

Пароль