Определите значения переменных s и i после выполнения фрагмента программы:
s:=0; i:=5;
while i>0 do
begin
s:=s+i; i:=i-l;
end;

MATVEI235    2   06.05.2020 11:19    2