Помогите! Паскаль. Заранее спасибо) паскаль. 1) известны оценки по информатике…

Question

82

Помогите! Паскаль. Заранее спасибо) паскаль. 1) известны оценки по информатике каждого из 20 учеников класса. В начале списка перечислены всепятерки, затем все остальные оценки. Сколько учеников имеют по информатике оценку пять? Условный оператор не использовать

категория: информатика

ответить

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

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

tankist · Accepted Answer

67

tankist

01 марта 2023

program primer; var a: array[1… 20] of integer; b,c: integer; beginwrite ('write raiting'); writeln; for b: =1 to 20 doread (a[b]); c: =1; repeatinc (c); until a[c]<5; write (c-1); end.

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

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

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: