(1) дано 17
(цикл)
17 * 2 + 31 = 65
65 * 2 + 31 = 161
161 * 2 + 31 = 353
(кц)
(5) ответ 353
Учти, что в разных версиях Paint названия могут меняться.
140. Левый столбец сверху-вниз:
Выделение прямоугольной области, карандаш, заливка цветом, палитра, линия, овал, скругленный прямоугольник, кисть.
Правый столбец сверху-вниз:
Выделение произвольной области, ластик, текст, масштаб, кривая, прямоугольник, многоугольник, распылитель.
141.
1) Выбрать заливку, нажать правой кнопкой мыши на холсте.
2) Выбрать цвет в палитре, инструмент кисть и рисовать на холсте.
3) Выбрать "Фигуры", найти прямоугольник, зажать левую кнопку мыши, перетаскивая мышь в сторону.
4) Выбрать "Фигуры", найти прямоугольник, зажать левую кнопку мыши + клавишу Shift, перетащить курсор мыши в сторону.
5) Выбрать "Фигуры", найти овал, зажать левую кнопку мыши, перетаскивая мышь в сторону.
6) Выбрать "Фигуры", найти овал, зажать левую кнопку мыши + клавишу Shift, перетащить курсор мыши в сторону.
<span>var i,s:integer;
begin
s:=0;
for i:=1 to 100 do
if i mod 3 = 0 then s:=s+i;
writeln('s = ',s);
end<span>.
Результат:
</span><span>s = 1683</span></span>
Вот вся Ваша задача...
<em>// PascalABC.NET 3.2, сборка 1415 от 25.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=MatrRandom(5,6,10,90);
a.Println(3); Writeln;
var b:=a.Rows.Select(x->x.Sum);
b.Println
end.
<u>Пример</u>
50 86 32 24 32 69
88 76 55 31 57 81
35 43 25 26 83 83
44 63 61 75 58 30
84 55 80 57 21 42
293 388 295 331 339
