Вводится 3-значное число. найти сумму его цифр. входные данные вводится одно число (от 100 до 999) выходные данные выводится одно число - сумма цифр примеры | входные данные | выходные данные | | а=345 | s=12 |
int main() { int n; do { cout <<"N = "; cin >>n; } while (n<100 || n>999); int sum = 0; while (n!=0) { sum+=n%10; n/=10; } cout <<sum <<endl; return 0; }
Pascal: var n,sum:integer; begin readln (n); sum:=0; while (n<>0) do begin sum:=sum+(n mod 10); n:=n div 10; end; writeln (sum); end.
Ты понимаешь, что для начала стоит сказать , что в паскале несколько видов повторения бывает. В звисимости от видов и разные механизмы. Например цикл пока или цикл с предусловием он называется: while <условие> do begin <тело цикла> end; до тех пора выполныется условие выполняем цикл.
Цикл с постусловием: repeat <тело цикла> until <условие выхода> повторять какие то действия до тех пор пока не это число указанно например не попадет в условие выхода
Если считать что у племени мульти в алфавите не 17, а 16 символов, то задача решается так: На 1 символ у племени мульти требуется log₂16 = 4 бита На сообщение из 100 символов - 100*4 = 400 бит Для племени пульти получится соответственно log₂32=5 бит, на все сообщение 50*5=250 бит Сравниваем: 400 бит > 250 бит Если в задаче 17, а не 16, то значение логарифма получится не целым (4.08746284125), можно это значение дальше и подставлять. Если считать, что каждый символ кодируется целым числом бит, то на 1 символ у племени мульти потребуется также 5 бит (округление выполняют всегда в большую сторону). Остальные расчеты делаются аналогично
#include <iostream>
using namespace std;
int main()
{
int n;
do
{
cout <<"N = ";
cin >>n;
}
while (n<100 || n>999);
int sum = 0;
while (n!=0)
{
sum+=n%10;
n/=10;
}
cout <<sum <<endl;
return 0;
}
Pascal:
var n,sum:integer;
begin
readln (n);
sum:=0;
while (n<>0) do
begin
sum:=sum+(n mod 10);
n:=n div 10;
end;
writeln (sum);
end.