Помогите решить задачу!!! Заполнить таблицу для автоматического определения красных дипломов ФИО Средний балл Наличие в дипломе «3» ГОС Диплом 1 …. 10 Средний балл – случайное число с одним знаком после запятой в ин...
Помогите решить задачу!!!
Заполнить таблицу для автоматического определения красных дипломов
ФИО Средний балл Наличие в дипломе «3» ГОС Диплом
1
….
10
Средний балл – случайное число с одним знаком после запятой в интервале от 3,0 до 5,0.
Наличие в дипломе «3» - случайное целое число в интервале от 0 до 5.
ГОС – случайное целое число в интервале от 3 до 5.
Красный диплом выдается в том случае, если:
- средний балл >=4,75
- в дипломе не должно быть «3»
- ГОС экзамен должен быть сдан на 5.
В зависимости от выполнения условий в графе «Диплом» вывести «Красный» или Синий».
Гость
Ответ(ы) на вопрос:
Гостьconst n=10;
var a1:array[1..n] of real;
a2,a3:array[1..n] of byte;
i:integer;
begin
Randomize;
for i:=1 to n do
begin
a1[i]:=0.1*(Random(21)+30);
a2[i]:=Random(6);
a3[i]:=Random(3)+3;
end;
writeln('ФИО Средний балл Наличие в дипломе "3" ГОС Диплом');
for i:=1 to n do
begin
write(i:3,a1[i]:10:1,a2[i]:15,a3[i]:13);
if (a1[i]>4.75)and(a2[i]=0)and(a3[i]=5)
then writeln(' Красный') else writeln(' Синий');
end;
end.
Не нашли ответ?
Похожие вопросы