Ребята, помогите пожалуйста?
Ребята, помогите пожалуйста!
Первое, пятое и второе задания в обоих вариантах не надо.
Решите, пожалуйста?
Решите, пожалуйста!
Первое задание!
ОЧЕНЬ СРОЧНО!
Помогите с первым заданием с объяснением?
Помогите с первым заданием с объяснением.
Помогите решить первые 3 задания, пожалуйста?
Помогите решить первые 3 задания, пожалуйста!
Написать алгоритм действий первого задания?
Написать алгоритм действий первого задания.
Пожалуйста, помогите мне?
Пожалуйста, помогите мне!
Задание по паскалю абс
НАПЕЧАТАТЬ НОМЕРА ЭЛЕМЕНТОВ МАССИВА, МЕНЬШИХ ПЕРВОГО.
Помогите?
Помогите!
Нарисуйте рисунок к первому заданию!
Не понимаю.
Первые два задания, пожалуйста?
Первые два задания, пожалуйста.
Помогите пляз.
Помогите написать программу в паскале?
Помогите написать программу в паскале.
Задание 2.
Помоги решить первое задание?
Помоги решить первое задание.
Вы перешли к вопросу Помогите пожалуйста написать массив(паскаль) первое задание?. Он относится к категории Информатика, для 10 - 11 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.
Знать бы, какой ввод данных
пусть он будет с клавиатуры, массив А из оценок N учеников
for i : = 1 to N do begin
sum : = sum + A[i] ; {это для среднего балла}
if (A[i] = 4) or (A[i] = 5) then
k1 : = k1 + 1 ; {счетчик отличников - хорошистов}
if A[i] = 2 then
k2 : = k2 + 1 ; {счетчик двоечников}
end ;
writeln('Количество учеников, написавших на 4 и 5 : ', k1) ;
if k2>0 then
writeln('Двоечники есть')
else writeln('Двоечников нет') ;
writeln('Средний балл : ', sum / N : 3 : 2) ;
end.