С! запросить с клавиатуры 5 слов, занести их в - вопрос №59406794 от настюша290204 04.05.2021 05:09

Question

Информатика: С! запросить с клавиатуры 5 слов, занести их в массив, определить количество в каждом из них знаков, занести в другой массив, напечатать на экране содержимое обоих массивов в табличной форме

настюша290204 · Answer

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

var a := ReadArrString(5);

var b := a.Select(t -> t.Length).ToArray;

var n := b.Max;

for var i := 0 to 4 do

Writeln(a[i]:n, b[i]:3)

end.

С! запросить с клавиатуры 5 слов, занести их в массив, определить количество в каждом из них знаков,