Сколько сайтов будет найдено по апросу принтер | сканер монитор, если по напросу принтер | сканер было найдено 450
сайтов, по запросу принтер & монитор 40, а по запросу
сканер & монитор - 50?​

Program konfety;           var t: real;                   i: integer;           begin       writeln('введите стоимость 1 кг конфет (в рублях): ');     read(t);     for i : = 1 to 10 do         writeln('стоимость ', i, ' кг конфет: ', i*t); end.смысл такой:   - цена 1 кг конфет (вещественный тип real) - счетчик, который будет увеличиваться на единицу после каждого выполнения тела цикла  . writeln() выводит на экран строку, которая заключена в кавычки. не забываем ставить точку с запятой после операций. read(t) дает вам возможность вписать, сколько стоит килограмм конфет, и присваивает переменной  то значение, которое мы ввели. далее идет цикл  , который по сути вот что делает:   для каждого целого  i от 1 до 10 сделай вот что:       выведи на экран строку 'стоимость  ', потом значение i, потом строку 'кг конфет:   ', потом число i умноженное на t после того, как закончишь обрабатывать все это в последний десятый раз, переходи дальше.а дальше у нас end (последний end. всегда с точкой). конец.