Определите, что будет напечатано в результате работы следующего фрагмента программы

Бейсик

DIM k, s AS INTEGER
s = 0
к = 0
WHILE s < 2000
    s = s + 32
    к = к + 1
WEND
PRINT к

Паскаль

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

Си

{
    int к, s;
    s = 0;
    к = 0;
    while (s < 2000) {
        s = s + 32;
        к = к + 1;
    }
    printf("%d" , k) ;
}

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

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