Информатика, опубликовано 2018-08-22 23:26:34 by Гость
Составить программу в которую вводят 10 оценок ученика и на выходе печатается количество 2 ученика. Помогите пожалуйста)
Ответ оставил Гость
Program ocenki;
var
A:array[1..10] of integer;
dv,i:integer;
begin
writeln( Введите 10 оценок ученика.После каждой оценки жмите "enter" );
For i:=1 to 10 do begin
readln(a[i]);
end;
For i:=1 to 10 do begin
if a[i]=2 then dv:=dv+1;
else end;
writeln(у ученика ,dv, двоек);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на