Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
Program Primer1; {„Ґ¬®бва жЁ® п Їа®Ја ¬¬ }
Uses Crt;
Var a: integer;
Begin
ClrScr;
Writeln('Џа®Ја ¬¬ ¤Ґ¬®бваЁагҐв а Ў®вг б ®ЇҐа в®а ¬Ё Read, Write');
Writeln('Ќ ¦¬ЁвҐ ENTER');
Readln;
Write('‚ўҐ¤ЁвҐ зЁб«®: ');
Readln(a);
Writeln('‚л ўўҐ«Ё зЁб«® a, а ў®Ґ ', a);
Writeln;
End. {Primer1}
Uses Crt;
Var a: integer;
Begin
ClrScr;
Writeln('Џа®Ја ¬¬ ¤Ґ¬®бваЁагҐв а Ў®вг б ®ЇҐа в®а ¬Ё Read, Write');
Writeln('Ќ ¦¬ЁвҐ ENTER');
Readln;
Write('‚ўҐ¤ЁвҐ зЁб«®: ');
Readln(a);
Writeln('‚л ўўҐ«Ё зЁб«® a, а ў®Ґ ', a);
Writeln;
End. {Primer1}
Соседние файлы в папке 01