Регистрация Спросить otvet5GPT
arinaanisimova2
18.02.2023 22:55
Информатика
Есть ответ 👍

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.
вас, учитель сказал запрогромировать, как это сделать. Что нужно выполнить? объясните.. Копировав и выполняя это выбивало ошибку. В чём проблема

291
458
Посмотреть ответы 3

Ответы на вопрос:

dronyuk88
dronyuk88
4,5(59 оценок)

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

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.

Шлюбка
Шлюбка
4,6(90 оценок)

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

Program prim1;Var i, n, p1, p2, s: integer;Beginwriteln ('vvedite chislo n');readln (n);for i:= 10 to 99 do beginp1:= i div 10;p2:= i mod 10;s:= p1+p2;if s=n then writeln ('i=', i);end;readln;end.
Program prim1; Var i, n, p1, p2, s: integer; Begin writeln (‘vvedite chislo n’); readln (n); {органи
artyommamedov
artyommamedov
4,4(26 оценок)
Глина размывается водой, соответственно вся информация теряется если пролить на неё воды. 

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS