Ответ:
95.625 КБ
Объяснение:
Пусть символ компьютерного алфавита весит 1 байт. Вычислим количество символов в сообщении.
34 * 60 * 48 = 97920
Сообщение весит 97920 байт = 95.625 КБ.
//PascalABC.NET
//Версия 3.4.2
begin
range(1,ReadInteger('n=')).Where(x->x.IsEven).Println;
end.
Так как в задании не указано, что введенное слово должно обрамляться пробелами, то код может быть такой:
var s,a:string;
begin
write('Введите строку : ');
readln(s);
write('Введите слово : ');
readln(a);
if(pos(a, s) <> 0) then writeln('Слово "',a,'" в строке есть')
else writeln('В строке такого слова нет');
end.
Тест №1
Введите строку : Привет участникам олимпиады!
Введите слово : ник
Слово "ник" в строке есть
Тест №2
Введите строку : Всем привет!
Введите слово : админ
В строке такого слова нет
27=1*2(в четвертой степени)+0*2(в третей степени)+1*2(во второй степени)+1*2(в первой степени)+1*2(в нулевой степени)=10111
14=1*2(в третей степени)+1*2(во второй степени)+0*2(в первой степени)+0*2(в нулевой степени)=1100
1. Что то похоже на дракона
2. Больше всего напоминает жирафа