Написать программу, формирующую линейный массив a[1..40] по следющему правилу: первые двадцать элементов массива равняются 1, остальные двадцать - 0. pascal

Vitomalc777 Vitomalc777    3   17.08.2019 17:00    0

Ответы
Hsjsngzhsbdndhd Hsjsngzhsbdndhd  05.10.2020 01:10
Const N=40;var A: array[1..N] of integer;i:integer;beginfor i:=1 to 20 do A[i]:=1;for i:=21 to N doA[i]:=0;for i:=1 to N dowrite(A[i]:3);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика