Определите, что будет напечатано в результате выполнения следующего алгоритма:

Прошу помогите!!!! Очень надо.
ВОТ ЗАПИСИ В ТЕТРАДИ.

алгоритм для решения задачи: Найти действительные корни квадратного уравнения вида ax^2+bx+c=0.

сумма старшего и с среднего разрядов а также сумма среднего и младшего разрядов заданного числа. 2 полученые два числа записываются друг задругом в порядке невозростания(без разделителей). Пример. Исходное число:277. Подразрядные суммы:9, 14. Результат:149. определите сколько из приведенных ниже чисел могут получиться в результате работы автомата 1616 169 163 1916 1619 316 916 116 В ответе запишите только количество чисел

Var s,k: integer;
begin
s:= 100
k:=7
repeat
s:= s-k
k:=k+1
Until k>10
writeln( s+k)
end.
Пожалуйста объясните как вывести отсюда результат

семестр, Dat[2] - оценка за второй семестр и т.д.). Определите что будет напечатано в результате выполнения следующего алгоритма:

Var k,m, term: integer;

Dat: array[1..8] of integer;

begin

Dat[1]:= 7 ; Dat[2]:= 7 ; Dat[3]:=6 ; Dat[4]:= 8 ;

Dat[5]:=4 ; Dat[6]:= 5; Dat[7]:= 4; Dat[8]:= 7;

term:=1; m:=Dat[1];

for k:=2 to 8 do

begin if Dat[k] < m then

begin m:=Dat[k]; term:=k

end end

write (term); end.

var a,b:integer;

т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трех алгоритмических языках.

Алгоритмический язык алг нач целтаб Day[1:7] цел i, m, d Day [1]:=79; Day [2]:=25; Day [3]:=67; Day [4]:=80; Day [5]:=63; Day [6]:=17; Day [7]:=68; d:= 1; m:= Day [1] нц для i от 2 до 7 если Day[i] > m то m:= Day[i]; d:=i все кц вывод d кон