алг
нач
<em>цел </em>k, l
k := int(rand(5, 80));
<u>вывод </u>"Угадайте число", нс | k
<u>ввод </u>l
<u><em>если </em></u>k = l <u><em>то</em></u>
<u>вывод </u>"Вы совершенно правы, сударь"
<u><em>иначе</em></u>
<u>вывод </u>":Р"
<u><em>все</em></u>
<span>кон</span>
Після роздумів щодо подальшого напряму розвитку сайту - як інтернет-каталог або блог, вирішили зробити прайс-лист товарів в форматі xls, який оновлюється по мірі надходження або продажу товарів, а на самому сайті будуть публікуватися статті на різні комп'ютерні (і не тільки) теми.
Щодо першої теми, то обрати було не складно, адже по роботі частенько доводиться стикатися з незнанням будови персонального комп'ютера (ПК) - системний блок називають процесором і т.п.
Для простоти наведено малюнок з основними деталями персонального комп'ютера.

Основними складовими стаціонарного персонального комп'ютера є системний блок, монітор, клавіатура і мишка, а також колонки (навушники).
Монітор і колонки - це пристрої виведення інформації, а клавіатура і мишка - це пристрої введення інформації. Ці пристрої ще називають периферійними. Основна задача периферійних пристроїв - введення інформації в комп'ютер (натискання клавіш на клавіатурі, рух курсору мишкою) і подальше виведення результатів у зрозумілому для людини вигляді (зображення на екрані, відтворення звуків на колонках).
Var A: array[0..100] of integer;
Объяснение:
1Кбайт — 1024байт.
1байт — 8бит.
1) 10240:1024 = 10Кбайт.
2) 204800:8:1024 = 25Кбайт.
В модуле CRT есть процедура, которая устанавливает цвет текста: TextColor(Цвет)
В качестве цвета служат числа от 0 до 15, либо константы (Green, Red и т.п.)
Пример:
uses crt;
begin
TextColor(LightGreen);
writeln('Цветной текст')
<span>end.</span>