Есть ответ 👍

Сколько минут потребуется модему, передающему информацию со скоростью 32 Кбит/с, чтобы передать 24-битное растровое изображение размером 800х600 пикселей?

219
314
Посмотреть ответы 2

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

Olgarezkova
4,6(85 оценок)

≈5.5 минуты


var a,s: integer;

begin

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

readln(a);

repeat

s: =s+a mod 10;

a: =a div 10

until a=0;

write ('сумма цифр: ',s);

end.

a mod 10 - эта операция определяет последнюю цифру числа (остаток от деления на 10)

первоначально sum равно 0

sum: =sum+(a mod 10) - накапливаем сумму всех цифр поочерёдно

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