1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

Вычислить Все Суммы Двухзначных Чисел

Тема в разделе "Вопросы новичков и не только", создана пользователем antonborodin, 21 янв 2012.

  1. antonborodin

    antonborodin Гость

    Репутация:
    0
    Помогите пожалуйста разобраться. Задача - составьте программу вычисления всех сумм двухзначных чисел на паскале.

    Сделал а потом понял что это не то и теперь не могу понять что нужно. Вот что я сделал

    Код:
    program task;
    var
    a,b,x : integer;
    const
    error = 'Error! Enter two-digit number.';
    begin
    Write('Enter a =');
    ReadLn(a);
    if (a <= 99) and (a >= 10) then
    begin
    Write('Enter b =');
    ReadLn(b);
    if (b <= 99) and (b >= 10) then
    begin
    x := a+b;
    WriteLn('a + b = ',x);
    end
    else
    Write(error);
    exit;
    end
    else
    WriteLn(error);
    exit;
    end.
     
  2. Cambur

    Cambur Active Member

    Репутация:
    0
    Регистрация:
    20 июн 2010
    Сообщения:
    27
    Симпатии:
    0
    привет! "вычисление всех сумм двухзначных чисел" - не понятно.
    ты сделал "вычисление суммы при условии, что числа - двузначные"
    можно сделать "сумму всех двузначных чисел" - просто просуммируй в цикле... наверное это и требуется.
     
Загрузка...

Поделиться этой страницей