var a,s,i:integer;
begin
randomize;
s:=0;
for i:=1 to 15 do
begin
a:=random(100);
s:=s+a;
end;
write('s=',s);
end.
В ячейку B1 нужно ввести формулу =СУММ($A$1:A1) и эту формулу скопировать (распространить) на весь столбец B
Смотри во вложенном pdf-документе.
В общем. Начерти окружность, квадрат, прямоугольник, параллелограмм и ромб.
После чего пиши: Ни одна из предложенных фигур графически не похожа на другую - истинное. Все рисунки являются геометрическими фигурами - истинное.
Все фигуры имеют углы - ложное. Некоторые фигуры имеют объём - ложное.