В соответствии с индивидуальным заданием таблицы 1 к лабораторной работе составить схему алгоритма и написать программу Таблица 1 Параметр= ………
X= …….. Y= ……….
X= …….. Y= ……….
X= …….. Y= ……….
Таблица 2 Параметр= ………
X= …….. Y= ……….
X= …….. Y= ……….
X= …….. Y= ……….

Основана американским программистом шотландского происхождения Джоном Макафи в 1987 году под названием McAfee Associates. В 1992 году компания была зарегистрирована в штате Делавэр. В 1994 году Джон Макафи покинул компанию. В 1997 году в результате слияния McAfee с компанией Network General была образована новая компания под названием Network Associates. В 2004 году компания вернула себе первоначальное название в сокращённом виде — McAfee.[2] В 2010 году после переговоров, длившихся 1,5 года, компания Intel выкупила акции тогда ещё публичной компании McAfee (листинг на Нью-Йоркской бирже: MFE) за 7,68 млрд долларов[3]. В 2014 г. компания Intel переименовала McAfee в Intel Security. Логотипом новой компании стал красный щит использующийся прежне McAfee, изменили только название. Продукты компании сохранили фрагмент «McAfee» в составе своих наименований.[2] В сентябре 2016 года компания Intel продала 51% акций подразделения Intel Security, в состав которой входит McAfee. Новым совладельцем компании стал инвестиционный фонд TPG. Сумма сделки составила 3,1 млрд.долл. и будет закрыта во втором квартале 2017 года.[4]

Rem BASIC-256
cls
errors = 0
print "Введите текст > ";

rem Пользователь вводит текст
input a$

rem Перебираем все буквы с начала и до предпоследней
for i=1 to length(a$)-1

rem Если встречаем букву Ч или Щ
if mid(a$, i, 1) = "ч" or mid(a$, i, 1) = "щ" then

rem Тогда проверяем следующую за ней букву.
rem Если это буква я, тогда подсчитываем очередную ошибку
if mid(a$, i + 1, 1) = "я" then errors = errors + 1
end if

rem Переходим к следующей букве
next i

rem Вывод результата
print "Количество ошибок в тексте ";
print errors

rem Конец программы
end