Чтобы анализировать причины дорожных происшествий, городские камеры должны распознавать сигналы светофоров. Напиши программу, запрашивающую ввод горящего сигнала светофора («красный», «жёлтый» или «зелёный») и отрисовывающую светофор с этим горящим сигналом. Параметры светофора есть в следующей вкладке.

После работы исполнителя рисунок должен остаться на экране, а исполнитель — скрыт.

x=16

ответ: 16 этажей

var

s,n,i: integer;

begin

write('введите количество чисел');

readln(n);

s: =0;

for i: =1 to n do

s: =s+i*3;

writeln(s);

end.

если 25(из которых 15 сто пудов в школьной и 10 смешанные) берут в школьной, то 10 человек берут в районной.

если 20(из которых 10 сто пудов берут в районной 10 смешанные), то 15 в школьной

получается 1) 10 человек; 2)15 человек; 3)10 чкловек; 4)10 чел; 5)15 чел. 

var

a,b: integer;

begin

write('введите в одной строке два целых числа и нажмите < enter> ');

readln(a,b);

if a=b then writeln('числа равны')

else 

if a> b then writeln(a,' больше')

else writeln(b,' больше')

end.