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

Бейсик

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
кон