Решите программу в Раскаль: Составить программу, которая заполняет массив A [1… 10]…

Question

92

Решите программу в Раскаль: Составить программу, которая заполняет массив A [1… 10] случайными целыми числами в диапазоне от 0 до 2 и выводит на экран количество элементов, равных 1.

в избранное ссылка

Знаете ответ?

russniger · Accepted Answer

58

russniger

25 февраля 2024

var i,c: integer; a: array [1… 10] of integer; begin for i: =1 to 10 do begin a[i]: =random (3); if a[i]=1 then inc (c) end; writeln (c) end.

комментировать

в избранное ссылка отблагодарить