Строка вводится с клавиатуры(максимум 99 символов). Первое слово должно быть с маленькой буквы или первая и последняя буквы этого слова не должны совпадать(иначе такое слово как Test не засчитается). Также будет засчитываться одна буква(abc d efg, буква d подходит, так как она и первая и последняя)
1.Выделение текста.
2.World Pat
3.Вродее Жирный
4.Пробел
5.War
Var
a,i,sum : integer;
begin
for i:=1 to 10 do begin
read(a);
if (a>10) and (a<50) then sum:=sum +a;
end;
write(sum);
end.
Знаю только
Актуальность: прогноз погоды
Достоверная: Инструкция
Полная: Сегодня дождь
Точность: Сейчас льет дождь