Program evm;
var
a:integer;
begin
Writeln('Сколько вам лет? ');
readln(a);
if a<18 then writeln('Вы ребёнок');
if (a>18) and (a<35) then writeln('Вы молоды');
If (a>35) and (a<100) then writeln('Вы взрослый');
readln;
<span>end.</span>
Егерь Семен, художник Роман, тренер Николай, врач Артур
ЭКРАН.................................................
Пользовательский интерфейс - это средства взаимодействия человека и компьютера. Он обеспечивается операционной системой. Ещё пользовательский интерфейс на основе меню предлагает возможность выбора управляющей команды из меню (списка команд), разновидность интерфейсов представляющих одной стороной пользователя, а другой машину (аппарат).
Program sh;
var n,k: integer;
begin
write('введите кол-во школьников: ');
readln(n);
write('введите кол-во яблок: ');
readln(k);
writeln('останется в корзинке: ', k mod n);
writeln('достанется каждому по ', k div n);
end.