Вэлектронной таблице значение формулы = сумм (а1: а2) равно 6. чему равно значение ячейки а3, если значение формулы= срзнач (а1: а3) равно 4

В ячейке A3 будет 6, так как результат от деления 3х чисел равен 4 т.е. 12/3=4

Программа.
var q,s:integer; 
begin
s:=1;
for q:=1 to 365 do
 s:=s+q;
Writeln(s);
end.

Описание программы.
var q,s:integer; // Объявление переменных, где q - цикл от 1 до 365, s - сумма результата.
begin // Начало выполнение программы.
s:=1; // Присваиваем переменной s значение 1, т.к. по условию 1 рубль.
for q:=1 to 365 do // Цикл от 1 до 365 
 s:=s+q; // Сумма цикла. То есть -  Сумма = Сумма + Цикл с шагом 1. Начальное значение s равно 1, поэтому сумма считывается больше суммы предыдущего дня.
Writeln(s); // Вывод результата.
end. // Конец выполнение программы.

Задача 6

На вход подаются p1, q1 – числитель и знаменатель первой дроби; p2, q2 – числитель и знаменатель второй дроби. Общий знаменатель q = q1 * q2, дополнительные множители q2 и q1. Итоговая формула p1/q1 + p2/q2 = (p1 q2 + p2 q1)/(q1 q2).

var p1, p2, q1, q2: integer;

begin

 read(p1, q1);

 read(p2, q2);

 write(p1 * q2 + p2 * q1, ' ', q1 * q2)

end.

Пример ввода:

3 4

1 2

Пример вывода:

10 8

Задача 7

var x, y: real;

begin

 read(x);

 y := x * x;

 y := 1 - y + 5 * y * y;

 write(y * y);

end.

Пример ввода:

0.75

Пример вывода:

4.07850647