Есть ответ 👍

Найти сумму цифр четырехзначного числа в паскалях

225
266
Посмотреть ответы 2

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

silinskay
4,5(49 оценок)

Program al; var a,b,c,d,n,s: integer; begin writeln('n='); readln(n); s: =0; a: =n mod 10; b: =n mod 100   div 10; c: = n div 100 mod 10; d: =n div 1000;   s: =a+b+c+d;   writeln('s=',s);   readln;   end.

АЛГОРИТМ,РИТМ,ГОРА,РАЦИЯ,ЗИМА МИР,РИТМ,ГРОЗА

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