Поделитесь своими знаниями, ответьте на вопрос:
Определите вид графики . 1)изображение строится из простых объектов- примитивов .обычно в качестве них выбираются прямые линии , эллипсы , прямоугольники , а также кривые . из простых векторных объектов различные рисунки 2)иллюстрации, выполненные средствами этой графики , с компьютерных программ . чаще всего для этой цели используют отсканированный иллюстрации , подготовленный художниками или фотографии за ранее огромное )
type uchenik=record
fam:string[20];
im:string[20];
kls:string[3];
end;
var a:array[1..100] of uchenik;
n,i,j,k:byte;
begin
clrscr;
writeln('Сколько учеников n=');
readln(n);
writeln('Введите данные о ',n,' учениках:');
for i:=1 to n do
begin writeln('Ученик ',i);
write(' Фамилия: ');
readln(a[i].fam);
write(' Имя: ');
readln(a[i].im);
write(' Класс ( год+буква, 11а): ');
readln(a[i].kls);
end;
writeln('Однофамильцы в одном классе:');
k:=0; for i:=1 to n-1 do for j:=i+1 to n do
if (a[i].fam=a[j].fam)and(a[i].kls=a[j].kls) then
begin
k:=1;
writeln(a[i].kls,' ',a[i].fam,' ',a[i].im,' ',a[j].fam,' ',a[j].im);
end;
if k=0 then write('Однофамильцев в одном классе нет!');
readln
end.