231425

12.02.2022 16:49 •  Информатика

Найти ошибки и исправить,и заполнить пропуски вычислить сумму цифр заданного k -значного числа var k : 1..4; n: double; begin writeln('введите количество цифр k: '); readln(k); writeln('введите число: '); readln(n); case k of 1 : writeln ('сумма цифр: ', ; 2 : writeln ('сумма цифр: ', (n div 10) + (n mod 10)); 3 : writeln ('сумма цифр: ', ; 4 : writeln ('сумма цифр: ', (n div 1000)+ (n div 10 mod 10)+(n div 10 mod 10) + (n mod 10)); end;