Помогите с паскалем, пожалуйста! Нужно вывести на экран список студентов, моложе 18 лет. N=5

Question

если не трудно, очень прошу помочь

N=5 это количество студентов

Ирина · Accepted Answer

Паскаль конечно хорошо, но совращение малолетних - это плохо!)

Виктория Фёдорова · Answer

0_0 
0o0 
0_0 
как бы так намекнуть.... ну.... ну, пусть так: 
я не вижу связи между списком студентов и каким-то N, равным пяти.

Даниил Марченко · Answer

Пишите на почту или в асю 586178755

Анна Трофимова · Answer

type 
tstud = record 
name:string; 
year:byte; 
end; 
const 
n=5; 
var 
stud: array [1..n] of tstud; 
k:1..n; 
begin 
writeln('Введите имена и возраст года') 
for k:=1 to n do 
begin 
write('имя -> '); 
readln(stud[k].name); 
write('возраст -> '); 
readln(stud[k].year); 
end; 
writeln; 
writeln('Лица моложе 18 лет'); 
for k:=1 to n do 
if stud[k].year < 18 then writeln(stud[k].name); 
readln; 
end; 
 
вроде так ...давно на паскале не писал ...