В социальную сеть «Друг вокруг» могут быть допущены пользователи 14 лет или старше. Напиши программу для регистрации новых пользователей. Она должна:
1) запрашивать число регистрируемых аккаунтов;
2) для каждого аккаунта запрашивать ввод имени и возраста (см. картинку);
3) если возраст < 14, то печатать: «Ошибка: возраст меньше 14 лет.», иначе — выводить «Аккаунт создан: <логин>».

count = 0

def user():

   login = input('Логин:')

   age = int(input('Возраст:'))

   if age >= 14:

       print(f'Акаунт создан: {login}')

       global count

       count += 1

   else:

       print('Ошибка: возраст меньше 14 лет.')

       count += 1

user_count = int(input('Число пользователей:'))

while user_count != count:

   user()

Объяснение:

uses graphabc,crt; const t=500;

beginsetwindowsize (600, 600); setpencolor (clblack); setbrushcolor (clblack); rectangle (45, 45, 105, 225 ); setpencolor (clred); setbrushcolor (clred); circle (75, 75, 25); setpencolor (clyellow); setbrushcolor (clyellow); circle (75, 130, 25); setpencolor (clgreen); setbrushcolor (clgreen); circle (75, 185, 25); setpencolor (clblack); setbrushcolor (clblack); rectangle (70, 225, 80, 300); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25);

repeatsetbrushcolor (cldkgray); circle (75, 185, 25); setbrushcolor (clred); circle (75, 75, 25); delay(t); setbrushcolor (cldkgray); circle (75, 75, 25); setbrushcolor (clyellow); circle (75, 130, 25); delay(t); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25); delay(t); until keypressed;

end.

картинка должна быть в папке с программой и быть в формате bmp

usesgraphabc;

varn: string; b: picture; s: integer;

beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.