Вопрос № 501174 - Информатика

Количество слов «Привет», которое будет отображено на экране после выполнения программы равно…
BASIC
a=5
WHILE a>0
     print “Привет”
     a=a-1
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=5;
   WHILE a>0 DO
         begin
            writeln(‘Привет’);
            a:=a-1;
        end;
END.
будет равно…

Количество слов «Привет», которое будет отображено на экране после выполнения программы равно…
BASIC
a=5
WHILE a>=1
     print “Привет”
     a=a-1
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=5;
   WHILE a>=1 DO
         begin
            writeln(‘Привет’);
            a:=a-1;
        end;
END.
будет равно…

Количество слов «Привет», которое будет отображено на экране после выполнения программы равно…
BASIC
a=5
WHILE a>1
     print “Привет”
     a=a-1
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=5;
   WHILE a>1 DO
        begin
            writeln(‘Привет’);
            a:=a-1;
        end;
END.
будет равно…

Количество слов «Информатика», которое будет отображено на экране после выполнения программы равно…
BASIC
a=20
WHILE a>0
     print “Информатика”
     a=a-2
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=20;
   WHILE a>0 DO
        begin
            writeln(‘Информатика’);
            a:=a-2;
        end;
END.
будет равно…

Количество слов «Информатика», которое будет отображено на экране после выполнения программы равно…
BASIC
a=5
WHILE a>0
     print “Информатика”
     a=a-2
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=5;
   WHILE a>0 DO
        begin
            writeln(‘Информатика’);
            a:=a-2;
        end;
END.
будет равно…

Количество слов «Информатика», которое будет отображено на экране после выполнения программы равно…
BASIC
a=10
WHILE a>=0
     print “Информатика”
     a=a-2
WEND
PASCAL
VAR
     a:integer;
BEGIN
   a:=10;
   WHILE a>=0 DO
        begin
            writeln(‘Информатика’);
             a:=a-2;
        end;
END.
будет равно…