Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

информа / _Pascal10 / 01 / PRIMER

.PAS
Скачиваний:
8
Добавлен:
14.05.2015
Размер:
320 б
Скачать
Program Primer1; {„Ґ¬®­бва жЁ®­­ п Їа®Ја ¬¬ }
Uses Crt;
Var a: integer;

Begin
ClrScr;
Writeln('Џа®Ја ¬¬  ¤Ґ¬®­бваЁагҐв а Ў®вг б ®ЇҐа в®а ¬Ё Read, Write');
Writeln('Ќ ¦¬ЁвҐ ENTER');
Readln;
Write('‚ўҐ¤ЁвҐ зЁб«®: ');
Readln(a);
Writeln('‚л ўўҐ«Ё зЁб«® a, а ў­®Ґ ', a);
Writeln;
End. {Primer1}



Соседние файлы в папке 01