Определите, что будет напечатано в результате работы следующей программы.
var s, k: integer;
begin
s := 3;
for k := 16 to 19 do
s := s * 2;
writeln(s);
end.

В результате этой работы будет напечатано 48.

Объяснение:

k16) 3*2=6

k17) 6*2=12

k18) 12*2=24

k19) 24*2=48

4 раза умножаем потому что интервал от k16 до k19

Я проверил в Паскале все работает и выдает 48