Question

СРОЧНО! Пожалуйста
информатика 10 класс
надо изменить программу, чтобы она не true или false принимала, а число 1 или 2. Если число 1 то по русски, если 2 то по английски

Answer 1

true на 2 меняете, false на 1, после i пишите =2, boolean меняете на integer или аналогичный тип данных, после второй процедуры pause в основной программе ;

Answer 2

procedure Pause(i:integer);

begin

if i=1

 then writeln('нажать enter')

 else writeln('press enter');

readln;

end;

begin

Pause(1);

Pause(2);

end.

Результат:

нажать enter

press enter