1 Дано натуральное число:
− сколько раз данная цифра А встречается в данном числе (А вводится с клавиатуры);
−верно ли, что в данном числе сумма цифр больше В, а само число делится на В (В вводится с клавиатуры).
2 Найти сумму всех чисел из промежутка от А до В, кратных 13 и 5. (А и В вводятся с клавиатуры)
|
|
|
|
1. раньше на форуме писал
2.
var
a,i,b:integer;
begin
for i:=a to b do
if (i mod 13=0)and(i mod 5=0) then write(i,' ');
end.
"Спасибо" принимается в виде повышения репутации ( Зелёный плюсик:) ).Спасибо
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
