Я напишу по простому сам распеределиш
Delete Удаление символа с право
Caps Lok увелечение букв
Esc выхождение из программы
Enter вход в программу или разделение строки
Приведенную формулу можно скопировать в ячейки A4 (получится =2*$C3) и D2 (получится =2*$C1). Нельзя скопировать в ячейки D1 и A1, так как номер строки в формуле задается с помощью относительной адресации, т.е. при копировании из 4-ой строки в 1-ю этот номер становится = 0 (это ошибка).
<span><span>program ggl;
</span>Это название программы
</span><span>var n, i, sum : integer;
</span>Описание переменных
<span>a : array [1..1000] of integer;
</span>Описание массива а (он целочиленный, в интервале от 1 до 1000)
<span>begin readln (n);
</span>Начало программы, запрос значение переменной n
<span> sum := 0;
</span>Присвоение переменной sum значение 0
begin readln (n);
sum := 0;
<span> for i := 1 to n do begin </span>
<span> a[i] := random (100); </span>
write (a[i], ' ');
<span> sum := sum + a[i]; </span>
<span>end; </span>
begin характеризует начало новой подпрограммы. Она - цикл, в котором идет перебор чисел от 1 до значения n, элементам массива a присваиваются рандомные числа от 1 до 100, элементы массива выводятся на экран.<span>
</span>После идет подсчет значения переменной sum (причем сначала находится, например, первый элемент массива, а уже после значение переменной sum, после второй элемент массива и он прибавляется к прежнему значению переменной sum). Подпрограмма кончается.
writeln;
write (sum / n);
<span>end.
</span>Вывод значения деления переменной sum на переменную n. Конец всей программы.
Знать бы, какой ввод данных
пусть он будет с клавиатуры, массив А из оценок N учеников
for i:=1 to N do begin
sum:=sum+A[i]; {это для среднего балла}
if (A[i]=4) or (A[i]=5) then
k1:=k1+1; {счетчик отличников-хорошистов}
if A[i]=2 then
k2:=k2+1; {счетчик двоечников}
end;
writeln('Количество учеников, написавших на 4 и 5: ', k1);
if k2>0 then
writeln('Двоечники есть')
else writeln('Двоечников нет');
writeln('Средний балл: ', sum/N:3:2);
end.
Это трёхканальная модель цвета.
