Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var i,s: integer;
begin
for i: = 100 to 200 do
if i mod 17=0 then s: =s+i;
writeln(s);
end.
состояние тропосферы в данной местности и в данное время называеться погодой
if x< 10 then x: =10
else
if x< 15 then x: = 16
else x: = 20
для обоих вариантов х=10, потому что дальше первой строчки оно не пойдет
нарисовать отрезок
нарисовать два круга с радиусами равными длине отрезка на концах отрезка
взять одну из точек пересечения кругов
соеденить точку с концами отрезка
Популярные вопросы