Составить программу на языке паскаль При поступлении в вуз абитуриенты , получившие "двойку" на первом экзамене , ко второму не
10-11 класс
|
допускаются . В массиве A[n] записаны оценки экзаменующихся , полученные на первом экзамене . Подсчитать , сколько человек не допущено ко второму экзамену .
uses crt;
var i,count:integer;
a:array[1..15] of integer;
begin
randomize;
count:=0;
writeln('Первый екзамен сдало 15 человек ');
for i:=1 to 15 do
begin
a[i]:=random(5)+1;
if a[i] = 2 then inc(count);
end;
for i:=1 to 15 do writeln('Студент ',i,' написал на ',a[i],' балов '); //не обезательно
writeln('На екзамен допущено ',count,' человек!! ');
readln;
end.
Другие вопросы из категории
• Календарь «Природы и труда»
• Рисунок
• Географическая карта
• Топографический план местности.
M+9L-K-2T+p
M=33257(10)
L=97A(16)
T=76705(8)
p=76705(8)
K=1 0000 0000 0011 0101(2)
Читайте также
массиве A[n] записаны оценки экзаменующихся , полученные на первом экзамене . Подсчитать , сколько человек не допущено ко второму экзамену .
Задача 2
В одномерном массиве , состоящем из n вещественных элементов , вычислить ;
1) минимальный элемент массива;
2)сумму элементов массива , расположенных между первым и последним положительными элементами .
Преобразовать массив таким образом , чтобы сначала располагать все элементы , равные нулю, а потом-все остальные .
на первом экзамене. подсчитать, сколько человек не допущено ко второму экзамену .В Turbopascal
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
Подсчитать, сколько человек недопущено ко второму экзамену.
"язык паскаль"
Ребят, помогите! Тема: одномерные массивы. Две задачи:
1) Написать программу, которая из заданного одномерного массива размерности N находит сумму только тех элементов, значения которых больше некоторого значения S.
S=5; Массив: 0,4 5,6 -2 10,1
2) При поступлении в ВУЗ абитуриенты, получившие "Двойку" на первом экзамене, ко второму не допускаются. В массиве A[N] записаны оценки экзаменующихся, полученных на первом экзамене. Подсчитать, сколько человек не допущено ко второму экзамену!
Заранее благодарю!