0 / 0 / 0
Регистрация: 22.03.2014
Сообщений: 3
1

Определить количество трехразрядных чисел. кратных 6 или 7

22.03.2014, 11:49. Показов 998. Ответов 1
Метки нет (Все метки)

Здравствуйте! Помогите пожалуйста!
Пыталась понять... не получилось, не программист я(( а сделать надо, чтоб зачет получить((

2)Вводится последовательность чисел. Конец ввода - О. Определить количество трехразрядных чисел. кратных 6 или 7.

Заранее огромное спасибо!!!
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.03.2014, 11:49
Ответы с готовыми решениями:

В последовательности целых чисел определить количество четных чисел, кратных 7
Написать программу которая в последовательности целых чисел определяет кол-во четных чисел кратных...

Определить количество чисел,кратных 5,среди переменных K,L,M
Определить количество чисел,кратных 5,среди переменных K,L,M.Вывести на экран идентификаторы...

Определить количество чисел,кратных 5,среди переменных K,L,M
Определить количество чисел,кратных 5,среди переменных K,L,M.Вывести на экран идентификаторы...

Определить количество чисел,кратных 5,среди переменных K,L,M
Определить количество чисел,кратных 5,среди переменных K,L,M.Вывести на экран идентификаторы...

1
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,965
22.03.2014, 17:02 2
Лучший ответ Сообщение было отмечено Ksenia_K как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  a, k: integer;
begin
  k:=0;
  repeat
    write('Ââåäèòå ÷èñëî: ');
    readln(a);
    if ((a>99) and (a<=999)) and ((a mod 6=0) or (a mod 7=0)) then
      inc(k);
  until a = 0;
  writeln('Èñêîìûõ ÷èñåë: ',k);
  readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.03.2014, 17:02

В последовательности натуральных чисел определить количество чисел, кратных 6, и оканчивающихся на 0
Напишите программу, которая в последовательности натуральных чисел определяет количество всех...

Определить количество чисел,кратных 5,среди переменных K,L,M
Определить количество чисел,кратных 5,среди переменных K,L,M.Вывести на экран идентификаторы...

Определить количество первых двухзначных чисел, кратных 7, не превышающих в сумме 100
1) определить количество первых двухзначных чисел, кратных 7, не превышающих в сумме 100 (цикл...

Даны натуральные числа. Определить количество членов последовательности, кратных 3 и не кратных 5
Помогите пожалуйста, пропустил, теперь не могу наверстать :) Даны натуральные числа n, a1, a2, …,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.