19.09.2021 22:16

Есть ответ 👍

Составьте программу, которая проверяет введенные числа на четырехзначность, а затем суммирует последнюю цифру числа. pascal

244

313

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

4,6(80 оценок)

как-то так:

//fpc 3.0.0

program helloworld;

var

total: integer; // результат суммирования

ent, last: integer; // ввод, подсчет

begin

total : = 0; // начальная сумма

// 30 можно поменять на любое число, чтоб цикл не шел вечно. а если надо вечно, то поменять условие на 1 < 2

while total < = 30 do

begin

// просим число

write('enter number: ');

readln(ent);

// получаем только 4-х значные

if (ent < 1000) or (ent > 9999) then

continue;

// берем последнюю цифру

last: = ent mod 1000;

last: = last mod 100;

last: = last mod 10;

// складываем

total: = total + last;

// выводим результат

writeln(total);

end;

end.

результат можно посмотреть тут:

4,4(19 оценок)

⇒ i=9 бит

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

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

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

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

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