Есть ответ 👍

Составьте программу для Pascal

Определить, сколько букв содержит самое длинное слово во введенной строке символов.

Входные данные

На вход программе подается строка, состоящая не более чем из 255 символов. Слова разделяются одним или несколькими пробелами.

Выходные данные

Выведите искомое число.

Примеры

входные данные

abcd ef

выходные данные

4

243
431
Посмотреть ответы 2

Ответы на вопрос:

NataliGuk
4,4(74 оценок)

А нет всё-таки по информатике


Var     u1, u2, n, i: longint;     a: array[1..10000] of longint; begin     readln(n);   for i : = 1 to n do     read(a[i]);   u1 : = 1;   u2 : = n;   while (u1  < u2) do   begin     write(a[u1],' ',a[u2],' ');     inc(u1); dec(u2)     end;   if u1 = u2 then     write(a[u1]) end.

Популярно: Информатика