(50×3)×5=750 Я сама не знаю,предполагаю!
200 850 байт = 196,14 КБ = 0,19 МБ
Компьютеры в XXI веке достигли пиковой популярности. Они используются везде, и это не преувеличение. Придя на любую работу мы столкнёмся с вопросом о знании компьютеров, смартфонов или других устройств. В магазине покупатель будет оплачивать покупку с помощью телефона, в институте мы будем записывать лекцию на ноутбуке, в офисе заполнять документы на компьютере. В моей профессиональной деятельности компьютер - это основа этой деятельности. Моя работа основана на знании устройства компьютера, его способностей, ведь я создаю "интерфейсы", через которые люди "общаются" с компьютером: производят вычисления, служат базой данных и так далее. Компьютеризирование в наше время протекает во всех областях, где человек только может работать. Поэтому через несколько лет мы вряд ли увидим какую-нибудь профессию, которая не требовала бы знания компьютеров или телефонов.
var
s: string;
e, tmp: integer;
mistake: boolean;
begin
mistake := true;
write('Введите логин: ');
readln(s);
if ((s.Length = 7) and (s[1] = 'i') and (s[2] = 'o')) then
begin
s := s.Remove(0, 2);
Val(s, tmp, e);
if (e = 0) then
mistake := false;
end;
if (mistake) then
write('Incorrect')
else
write('Correct');
end.