Вот более правильное определение для справки Операцио́нная систе́ма, сокр. ОС (англ. operating system, OS) — комплекс управляющих и обрабатывающих программ, которые, с одной стороны, выступают как интерфейс между устройствами вычислительной системы и прикладными программами, а с другой стороны — предназначены для управления устройствами, управления вычислительными процессами, эффективного распределения вычислительных ресурсов между вычислительными процессами и организации надёжных вычислений. Это определение применимо к большинству современных операционных систем общего назначения.
Program R; uses crt; Var a, c, d, l, k: String[50]; b: integer; Begin Writeln('Привет!'); Writeln('Давай познакомимся! Как тебя зовут?'); Readln(a); Writeln('Очень приятно, ',a,'! ','А меня зовут Евгений.'); Writeln('Сколько тебе лет?'); Readln(b);
if (a = 'Антон' and b=15) then Writeln('Да... Через 50 лет тебе уже будет 65 лет, а звать тебя будут не Антон, а дед Антон');
Writeln('Мне тоже,' b, '!'); Writeln('Какую музыку ты любишь слушать?'); Readln(c); Writeln('Ничего себе! Да у нас похожие вкусы! Ведь я тоже люблю слушать ', c); Writeln('Какое время года ты любишь?'); Readln(d); Writeln('Я тоже обожаю ',d); Writeln('Какой твой любимый цвет?'); Readln(l); Writeln('Мне кажется, мы во многом похожи... Это и мой любимый цвет.'); Writeln('Кто ты по знаку зодиака?'); Readln(k); Writeln('Надо же! Я тоже ',k,'.'); Writeln('Было очень приятно познакомиться и поговорить,' a,'! Пока!'); End.
Вот более правильное определение для справки
Операцио́нная систе́ма, сокр. ОС (англ. operating system, OS) — комплекс управляющих и обрабатывающих программ, которые, с одной стороны, выступают как интерфейс между устройствами вычислительной системы и прикладными программами, а с другой стороны — предназначены для управления устройствами, управления вычислительными процессами, эффективного распределения вычислительных ресурсов между вычислительными процессами и организации надёжных вычислений. Это определение применимо к большинству современных операционных систем общего назначения.
Program R;
uses crt;
Var a, c, d, l, k: String[50]; b: integer;
Begin
Writeln('Привет!');
Writeln('Давай познакомимся! Как тебя зовут?');
Readln(a);
Writeln('Очень приятно, ',a,'! ','А меня зовут Евгений.');
Writeln('Сколько тебе лет?');
Readln(b);
if (a = 'Антон' and b=15) then
Writeln('Да... Через 50 лет тебе уже будет 65 лет, а звать тебя будут не Антон, а дед Антон');
Writeln('Мне тоже,' b, '!');
Writeln('Какую музыку ты любишь слушать?');
Readln(c);
Writeln('Ничего себе! Да у нас похожие вкусы! Ведь я тоже люблю слушать ', c);
Writeln('Какое время года ты любишь?');
Readln(d);
Writeln('Я тоже обожаю ',d);
Writeln('Какой твой любимый цвет?');
Readln(l);
Writeln('Мне кажется, мы во многом похожи... Это и мой любимый цвет.');
Writeln('Кто ты по знаку зодиака?');
Readln(k);
Writeln('Надо же! Я тоже ',k,'.');
Writeln('Было очень приятно познакомиться и поговорить,' a,'! Пока!');
End.