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

MihailBobr MihailBobr    2   29.09.2019 23:10    3

Ответы
frnkiero1133324 frnkiero1133324  09.10.2020 04:00
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 слов, занести их в массив, определить количество в каждом из них знаков,
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика