Задать вопрос
21 марта, 16:50

Модуль 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.

+4
Ответы (1)
  1. 21 марта, 16:58
    0
    Не srt, а crt! в остальном вроде нормально
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Модуль srt не найден в паскале как исправить вот код program prim_3; uses srt; Label 1; const Sob='Вам доступны базы'; var p:integer; otv:0 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы