Взял чайник
налил воду
спустился в шахту
включил чайник
подождал пока чайник закипит
взял чайник
поднялся из шахты
<span>program mm;
var a,b,i,summ:integer;
begin
Writeln ('Введите А и В');
readln(a,b);
for i:=a to b do
if i mod 2 </span><span><> 0</span><span> then
summ:=summ+i;
Writeln('Сумма = ',summ);
end. </span>
Регистры, Кэш, ОЗУ, Внешняя память
ГБВА
3 вариант