Напишите программу, которая преобразует строчные буквы в заглавные, используя байтовые операции. Для работы используйте XOR - XOR Ry,Rx – «исключающее ИЛИ» (чтобы исключить код 20)
Блок данных может выглядеть так:
D:
DATA «abcdefgh»

1) Бюджет
2) Линк(и) на прайс магазина(ов), где будете брать систему, обязательно укажите Город в котором будет покупаться.
3) Что собираетесь брать:
- Только системник
- Ситемник и монитор
- Системник, монитор и переферия
- Иные уточняйте какие варианты.
4) Указывайте для каких задач берётся сабж.
а) Для игровых систем:
- Указывайте разрешение монитора, частоту развертки, аппаратную синхронизацию (Free|G-Sync), есть на нём цифровые входы (HDMI|DVI|DP) или модель монитора, а также параметры анизотропной фильтрации и сглаживания, которые будут использоваться в играх.
- Указывайте названия игр или хотябы жанры.
б) Для систем, на которых будет слушаться Музыка:
- Уточняйте, что за ММАС Мультимедийная Акустическая Система у Вас стоит или планируется к приобретению.
- Уточняйте носитель/тип файлов/битрейт.
- Уточняйте жанры Музыки.
в) Для графических станций:
- Уточняйте какой монитор используется.
- Уточняйте с какими программами Вы будете работать.
г) Иные.
5) Уточняйте планируете ли Вы разгон системы.
6) Уточняйте планируете ли Вы апгрейд системы в ближайшие 6 месяцев.
Если планируете, то сообщайте когда и в каком объёме финансовых вливаний.
7) Если у Вас есть какое-то железо, которое Вы ещё планируете использовать, уточняйте какое именно. Если его много, то Вам в ветку по Апгрейду.
8) Если у Вас есть какое либо требования, уточняйте:
- Брендовая принадлежность ATI/AMD или Abit/DFI, ets.
- Требования по дизайну/размерам.
- Требования по шуму. Уточняйте здесь.
- Иные.
9) Наброски конфигурации ПК

ВНИМАНИЕ: ВСЕ посты не заполненные по вышеописанному запроснику будут маркироваться Кураторами off-top'ом - вероятность, что Вам в этом случае ответят крайне низка.

Правила Конференции и Правила Форума действуют в полном объёме.
Локальные правила ветки:
Бессмысленные посты "+1" и иже сним, Флуд, Флейм и Оверквотинг будут премировать ЖК на месяц.
Фанатство награждается БАНом на 24часа.
Умышленное коверканье Русского языка и неиспользование тега [rus][ /rus] у постов, написанных транслитом, как и злоупотребление терминами награждается ЖК на 2 недели.
Оффтоп в рамках обсуждаемого вопроса разрешен, но должен быть заключён в тег [ off ][ /off ].

Если обсуждение затягивается более чем на 5 постов по конкретной позиции - дать линк на специализированную ветку и продолжать дискуссию уже в ней.

Просьба не злоупотреблять меткой "EOL", по русски: по меньше используйте клавишу "Enter", посты объёмные - не утяжеляйте их сверх меры.

program vt;

 

type toy = record     // тип игрушка

      name : string;   // название

      price : integer;     // стоимость

      age : integer;         // возрастные границы

      a: boolean;

end;

 

var

    f : text; // переменая для работы с файлом

    i : integer; // счетчик

    size : integer;   // кол. игрушек

    maxage : integer; // макс. возрастная граница

    maxprice : integer;     // макс цена игрушки

    mas : array [1..100] of toy;   // контейнер игрушек

   

begin

      assign(f, 'input.txt');   // связываем переменную с файлом

      reset(f);               // открываем файл на чтение

      i : = 1;                 // 1 игрушка

      maxprice : = 400;         // макс цена = 400

      maxage: =5;                 //макс. возрастная граница = 5

      while (not eof(f)) do   // пока не дошли до конца файла

      begin

          readln(f, mas[i].name);     // считываем данные об игрушке

          readln(f, mas[i].price);

          readln(f, mas[i].age);

          maxage > mas[i].age;   //найти все до 5 лет

          writeln

         

      end;

end.