Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования.

Бейсик

DIM k, s AS INTEGER
s = 512
к = 0
WHILE s < 2048
	s = s + 64
	к = к + 1
WEND
PRINT к

Паскаль

var k, s: integer;
begin
	s := 512;
	k := 0;
	while s < 2048 do
		begin
			s := s + 64;
			k := k + 1; 
		end;
	write(k); 
end.

Си

{
	int k, s;
	s = 512;
	к = 0;
	while (s < 2048) {
		s = s + 6 4;
		k = k + 1;
	}
	printf("%d", k);
}

Алгоритмический язык

нач
	цел k, s
	s := 512
	k := 0
	нц пока s < 2048
		s := s + 64
		k := k + 1
	кц
вывод k
кон