НАДО НАПИСАТЬ ПРОГРАММУ В PASCAL
Программа проводит анкетирование студентов. Студенты вводят Ю - если он юноша, Д - если девушка и количество баллов за экзамен (от 1 до 70 баллов). Программа должны выдать в какую группу попал этот чел: девушки, набравшие меньше или равно 35 баллов идут в группу технологов, а больше 35 баллов - в группу менеджеров; юноши набравшие больше 35 баллов идут на инженера, а набравшие меньше или равно 35 баллов - в металлургию
Нет комментариев
Ответы
Гость Program sort;
var sex:string;
points:integer;
begin
writeln('Введите пол');
readln(sex);
writeln('Введите кол-во баллов');
readln(points);
if sex = 'Д' then begin
if points <= 35 then
writeln('В группу технологов')
else
writeln('В группу менеджеров');
end
else begin
if points <= 35 then
writeln('В группу металургов')
else
writeln('В группу инженеров');
end;
end.
Нет комментариев
Похожие вопросы
Информатика
ПЛИЗ, фото, Информатика....
Информатика
ВЫВЕСТИ В ПАСКАЛЬ ПЛИИЗ...
Информатика
Кто управляет стариком хоттабычем...
Список предметов
