Есть ответ 👍

Які з наведених операторів виконують малювання кола з радіусом 100 пікселів (Кілька відповідей)
а)Image1.Canvas. Ellipse (20,30,220,230)
б)Image1.Canvas. Rectangle (20,30,220,230)
в)Image1.Canvas. Ellipse (0,0,220,230)
г)Image1.Canvas. Ellipse (20,30,120,130)

212
370
Посмотреть ответы 1

Ответы на вопрос:


Const k=10; {k - количество чисел в массиве} var a: array[1..k] of integer;       i,summ,n: integer; {i - счетчик цикла, summ - сумматор, n - количество элементов массива с четным значением}       sr: real; {sr - среднее арифметическое} begin   summ: =0; n: =0; { обнуляем счетчики}   for i: =1 to k do       begin           a[i]: =random(50); { заполняем массив случайными числами}           write (a[i],' '); {выводим массив}           if a[i] mod 2=0 then               begin                   summ: =summ+a[i]; {находим сумму элементов массива с четными значениями}                   n: =n+1               end       end;   sr: =summ/n; {находим среднее арифметическое}   writeln;   writeln (sr: 0: 2) { выводим среднее арифметическое} end.  

Популярно: Информатика