задание по программированию pascalЗаменить к-й элемент одномерного массива на количество

Задание по программированию pascal
Поменять к-й элемент одномерного массива на количество нулевых частей

и сделать блок схему

Задать свой вопрос
1 ответ
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программка не работает, обновите версию!
begin

  var mas:=ArrRandom(20,0,10); mas.Println;

  var k:=Readinteger('Введите индекс элемента который находится в спектре 0..20:-gt;');

  var a:=mas.Where(t-gt;t=0).Count; Writeln('Количество 0=',a);  mas[k]:=a;

  mas.Println;

end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт