profile
Размещено 6 лет назад по предмету Информатика от igkronov

Pascal.abc Задача 1: Распечатать первые 16 степеней 2. (для переменной использовать тип longint). Задание 2: Пользователь вводит 10 чисел. Создать счетчики, и подсчитать сколько чисел положительные, отрицательные, равные нулю. Задание 3: Пользователь вводит число n. Вывести сумму первых n целых чисел. - ДОПОЛНЕНИЕ: Все задачи на цикл for

  1. Ответ на вопрос
    Ответ на вопрос дан ingr

    первая

    var

       a : longint := 2;

       

    begin

       write('первые 16 степеней числа ', 2,' : ');

       for var i := 1 to 16 do begin

           a *= 2;

           write(a, ' ');

       end;

    end.

    втрая

    var

       a, p, o, n : integer;

       

    begin

       write('введите 10 чисел : ');

       for var i := 1 to 10 do begin

           read(a);

           if a < 0 then o += 1 else if a > 0 then p += 1 else n += 1;

       end;

       writeln('положительных = ', p);

       writeln('отрицательных = ', o);

       writeln('нулю = ', n);

    end.

    третья

    var

       n, s : integer;

       

    begin

       write('введите n=');

       readln(n);

       for var i := 1 to n do s += i;

       writeln('сумма чисел s=', s);

    end.

    1. Ответ на вопрос
      Ответ на вопрос дан ingr
      опечатка: s += i это то же что s:=s+i
    2. Ответ на вопрос
      Ответ на вопрос дан igkronov
      спасибо большое.
    3. Ответ на вопрос
      Ответ на вопрос дан igkronov
      и снова привет я уже задал один и тот же вопрос 3 раза
    4. Ответ на вопрос
      Ответ на вопрос дан igkronov
      21 балл тебе упадет суммарно
    5. Ответ на вопрос
      Ответ на вопрос дан igkronov
      не?
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.