Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
Простые типы данных
1 Дано натуральное число:
− сколько раз данная цифра А встречается в данном числе (А вводится с клавиатуры);
−верно ли, что в данном числе сумма цифр больше В, а само число делится на В (В вводится с клавиатуры).
2 Найти сумму всех чисел из промежутка от А до В, кратных 13 и 5. (А и В вводятся с клавиатуры)
1 | Автор: Lenohka))) | 2012-06-01, 13:40   |  Репутация: [ + 0 ]
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
2 | Автор: Berestovskiy | 2012-06-02, 15:48   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-06-02, 15:48   |  Репутация: [ + 211 ]
  • Страница 1 из 1
  • 1
Поиск: