Даны натуральные числа n и m. Составьте программу, которая вычисляет сумму последних m цифр числа n.
5-9 класс
|
Pascal
var m,n,i,z,p:integer;
begin
readln(m);
readln(n);
for i:=1 to m do
begin
p=n mod 10;
z=z+p;
end;
writeln(z);
end.
Другие вопросы из категории
1) в конце данной последовательности дописать ее зеркальную копию;
2) к цифрам, стоящим на четных местах, считая слева направо, прибавить по 1.
Найдите сумму четных цифр, находящихся в последовательности, получившейся после шестикратного применения алгоритма и запишите ее в ответе.
y = x+sin(sinx)
при x = 0,5234
P.S. Очень срочно нужно, заранее благодарен :)
Читайте также
2-ая Составить программу , которая в двумерном массиве случайных чисел элементы всех четных строк делает нулевыми
язык паскаль
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
2)Составить программу которая вычисляет произведение натуральных чисел от 5 до 10.
помощью которой определите сумму кубов цифр этого числа
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.