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

Ответы (1)

Суюнчак 14.08.2025 0
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.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ