profile
Размещено 4 года назад по предмету Информатика от valentina05ru

Program prim1;
Var i, n, p1, p2, s: integer;
Begin
writeln (‘vvedite chislo n’);
readln (n);

{организовываем цикл с параметром от 10 до 99}
for i:= 10 to 99 do begin
p1:= i div 10; { выделяем первую цифру}
p2:= i mod 10; {выделяем последнюю цифру}
s:= p1+p2; {находим сумму цифр числа i}
{проверяем равна сумму цифр числа i числу n }
if s=n then writeln (‘i=’, i);
end;
readln;
end.
Помогите прошу вас, учитель сказал запрогромировать, как это сделать. Что нужно выполнить? объясните.. Копировав и выполняя это выбивало ошибку. В чём проблема. Помогите пожалуйста

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

    Вы не те кавычки используете - такие нельзя, нужно вот такие " либо '

    Var i, n, p1, p2, s: integer;

    Begin

    writeln ('vvedite chislo n');

    readln (n);

    {организовываем цикл с параметром от 10 до 99}

    for i:= 10 to 99 do begin

    p1:= i div 10; { выделяем первую цифру}

    p2:= i mod 10; {выделяем последнюю цифру}

    s:= p1+p2; {находим сумму цифр числа i}

    {проверяем равна сумму цифр числа i числу n }

    if s=n then writeln ('i=', i);

    end;

    readln;

    end.

    1. Ответ на вопрос
      Ответ на вопрос дан valentina05ru
      Вау..большое вам спасибо
  2. Ответ на вопрос
    Ответ на вопрос дан ColeBenett

    Вот, теперь программа работает, убрал комментарии. Ещё добавил скришот работы:

    • Program prim1;
    • Var i, n, p1, p2, s: integer;
    • Begin
    • writeln ('vvedite chislo n');
    • readln (n);
    • for i:= 10 to 99 do begin
    • p1:= i div 10;
    • p2:= i mod 10;
    • s:= p1+p2;
    • if s=n then writeln ('i=', i);
    • end;
    • readln;
    • end.
    1. Ответ на вопрос
      Ответ на вопрос дан ColeBenett
      Не за что. Удачи!
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
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) их не спросили

Информация

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