Артём Снетков
Помогите с паскалем, пожалуйста! Нужно вывести на экран список студентов, моложе 18 лет. N=5
если не трудно, очень прошу помочь
N=5 это количество студентов
если не трудно, очень прошу помочь
N=5 это количество студентов
Паскаль конечно хорошо, но совращение малолетних - это плохо!)
0_0
0o0
0_0
как бы так намекнуть.... ну.... ну, пусть так:
я не вижу связи между списком студентов и каким-то N, равным пяти.
Пишите на почту или в асю 586178755
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;
вроде так ...давно на паскале не писал ...