Модуль srt не найден в паскале как исправить вот код program prim_3; uses srt; label 1; const sob='вам доступны базы'; var p: integer; otv: 0..1; begin 1: clrscr; writeln ('введите ваш пароль'); readln (p); clrscr; gotoxy (10,8); case p of 1747: writeln (sob,' a,b,c'); 3331,7922: writeln (sob,' b,c'); 8927..9455: writeln (sob,' c'); else writeln ('у вас нет права доступа к базам данных'); end; gotoxy(15,10); writeln ('будете продолжать работу ''да-1,нет-0' ); readln (otv); if otv=1 then goto 1; end.

АняМур123    3   14.06.2019 23:50    0