profile

Опубликовано 5 лет назад по предмету Информатика от SPY75

Срочно помогите!

1)с помощью цикла repeat вывести слово информатика 5 раз

2)с помощью цикла while вывести слово информатика   5 раз

  1. Ответ
    Ответ дан boris768

    1)

    var i:integer;

    begin

    i:= 0;

    repeat

    writeln("информатика");

    i:=i+1

    until i <> 5;

    end.

     

    2)

    var i:integer;

    begin

    i:= 0;

    while(i < 5) do begin

    writeln("информатика");

    i := i+1;

    end;

    end.

     

     

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы
Хаааа
Математика - 1 месяц назад
Хаааа
Математика - 1 месяц назад