• Информатика, 8 класс. Срочно!
    1. Дано: for i := 1 to 18 do

    При первом выполнении тела цикла i= (ответ).

    2.

    Сколько раз будет выполнен цикл for n := 1 to 64 do?
    Ответ:

    3.
    нет
    Параметр цикла

    да
    Тело цикла

    Дальше идёт стрелочка вниз и следующие варианты:
    1) цикл с параметром
    2) цилиндрический цикл
    3) цикл с неизвестной величиной
    4) цикл с параметром по убывающим значениям параметра

    4.

    Запиши программу на языке Паскаль.

    var
    i,n:word;
    begin
    write('n=');
    readln(n);
    for i:=1 to n do begin write(i,' ');
    end;
    readln;
    end.

    На экране

    n = 4

    1) 0
    2) 1234
    3) 4
    4) 16

    5.

    Заполни пропуски в программе.

    Вывод на экран кубов чисел от 12 до 4.

    var
    (ответ): integer;
    begin
    for n:= (ответ) downto (ответ) do
    writeln (n*n*n);
    readln;
    end.

    6.

    Дано: for i := 10 downto 5 do

    i изменяется от (ответ) до (ответ) с шагом (ответ)

    7.

    Дана программа на языке Паскаль. Заполни пропуски.

    Вывод на экран квадратов чисел от 1 до 29.

    var
    (ответ): integer;
    begin
    for i:=1 to (ответ) do
    writeln(sqr( ответ ));
    readln;
    end.

    8.

    Запиши программу на языке Паскаль.
    Вывести на экран числа от 2 до 16 в обратном порядке.

    var
    i: integer;
    begin
    for i:= (ответ) downto (ответ) do
    writeln(ответ: 16, или "i", или i, или 2);
    readln;
    end.

    Буду искренне благодарен тому, кто корректно ответит на все вопросы и не станет писать "Ой, сам делай" или "Это элементарно" и т. д, как это обычно бывает на этом... форуме...

Ответы 1

  • 1) 12) 63 (но могу ошибаться)3) 1 (если я правильно понял вопрос)4) 2 (если исправить эту кривую программу - иначе ничего не будет - просто ошибка)5) varn: integer;beginfor n:=12 downto 4 dowriteln (n*n*n);readln; //Какой неумеха писАл эту программу?!end.6) i изменяется от 10 до 5 с шагом 1 - опять же, шаг, как правило задается.7) vari: integer;beginfor i:=1 to 29 dowriteln(sqr(i));readln;end.8) vari: integer;beginfor i:= 16 downto 2 dowriteln('ответ: 16, или "i", или i, или 2'); //ну тут уж я не знаю, как исправлять.readln;end.
    • Автор:

      kidwall
    • 4 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years