Дано: for I := 1 to 20 do
При последнем выполнении тела цикла I = ?

ответ:В конце цикла I будет равно 20

Объяснение:

3*2=6128*512*6=393216ъ128+512=640640: 10=6464*6=384кб

program fasf;

var

n,q: integer;

begin

write('введите этаж: ');

readln(n);

q: =n*4;  

writeln('квартиры: ',q,q-1,q-2,q-3);

end.