Предмет: Информатика,
автор: Thursday11
Составить программу в которую вводят 10 оценок ученика и на выходе печатается количество 2 ученика. Помогите пожалуйста)
Ответы
Автор ответа:
0
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.
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.
Автор ответа:
0
если будут ошибки - извините, время было мало
Автор ответа:
0
оставалось 3 минуты чтобы добавить ответ
Автор ответа:
0
Спасибо большое)
Автор ответа:
0
на всякий случай проверьте в паскале
Автор ответа:
0
Хорошо)
Похожие вопросы
Предмет: Физика,
автор: hanaby
Предмет: Геометрия,
автор: kondratov221
Предмет: Химия,
автор: Про100Хулиган
Предмет: Биология,
автор: Комар1458
Предмет: Литература,
автор: Тоська2904