Регистрация
Лизатян4
30.07.2022 14:05
Информатика
Есть ответ 👍

Написать и реализовать программу на языке Pascal. В строке символов определить количество слов, найти самое длинное слово. Слова отделяются произвольным количеством пробелов, запятых, точек.

146
338
Посмотреть ответы 2

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

cooldown229
cooldown229
4,5(62 оценок)

// PascalABC.NET

begin

 var a := ReadString.ToWords(',','.',' ');

 Println('Самое длинное слово:', a.MaxBy(p -> p.Length));

 Print('Всего слов:', a.Length)

end.


Написать и реализовать программу на языке Pascal. В строке символов определить количество слов, найт
lolkajoin
lolkajoin
4,4(59 оценок)
//pascal const n=10; var   a: array[1..n] of integer;   i,k: integer; begin //для теста заполнение массива сл. числами   for i: =1 to n do a[i]: =random(50);   writeln('введите индекс элемента ');   readln(k);   writeln(a[k]); end.

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