3) цифры кол во
4) кругов в цифрах, например в 8 два круго
Остальное незнаю
Алгоритм посадки дерева:
опустить в ямку саженец,засыпать ямку с саженцем землёй,полить саженец водой,выкопать в земле ямку
Вот на примере этого можно много чего составить, не знаю скрлько тебе задач сделать надо но вот:
Program room;uses crt;var a, b, h : integer; v, s, l, k : real;begin write('Введите длину, ширину и высоту комнаты : '); readln(a, b, h); l:= 10.5; k:= 0.5; v:= a * b * h; s:= l * k; writeln('Ответ : ',v/s :5:2);end.
Var
L:integer;
begin
writeln('Введите средний балл ученика: ');
readln(L);
if L>=13 then
writeln('Ученик будет посещать факультатив.');
if L<13 then
writeln('Ученик не может посещать факультатив!');
<span>end.</span>