Есть ответ 👍

Номер 32 и 33. подождите, пока не прикреплю .

127
360
Посмотреть ответы 1

Ответы на вопрос:


Если нужно только эти числа(5,4,3,5,5,5,4), то вот программа.var b,c1,c2,c3: integer; a: array [1..7] of integer; i: byte; begina[1]: =5; a[2]: =4; a[3]: =3; a[4]: =5; a[5]: =5; a[6]: =5; a[7]: =4; for i: = 1 to 7 do begincase a[i] of3: c1: =c1+1; 4: c2: =c2+1; 5: c3: =c3+1; end; end; writeln('количество чисел 5 в данном ряду=',c3); writeln('количество чисел 4 в данном ряду=',c2); writeln('количество чисел 3 в данном ряду=',c1); end.

Популярно: Информатика