Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/124: Рейтинг темы: голосов - 124, средняя оценка - 4.83
0 / 0 / 1
Регистрация: 03.01.2012
Сообщений: 32
1

Даны натуральные числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не делятся на 5

03.01.2012, 23:27. Показов 26017. Ответов 4
Метки нет (Все метки)

Даны натуральные числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не делятся на 5. Надо сделать в программе Pascal ABC
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.01.2012, 23:27
Ответы с готовыми решениями:

Напечатать те числа, которые делятся на 3, но не делятся на 5
8. Даны натуральные числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не делятся на...

Даны целые числа: a, b, c, d сложить только те из них, которые делятся на 3 или на 5
СРОЧНО СРОЧНО!ХЭЛП!ПОМОГИТЕ Даны целые числа: a, b, c, d сложить только те из них,которые делятся...

Напечатать те из двузначных чисел, которые делятся на 4, но не делятся на 6
«Вложенные циклы. Преждевременное завершение цикла» Напечатать те из двузначных чисел, которые...

Даны натуральные знаковые числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не делятся на 5.
Даны натуральные знаковые числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не...

4
--\.founder./--
564 / 564 / 392
Регистрация: 20.10.2011
Сообщений: 867
04.01.2012, 00:17 2
Лучший ответ Сообщение было отмечено companiltd как решение

Решение

Pascal
1
2
3
4
5
6
7
8
 uses crt;
 
 var i:integer;
 
 begin
    For i:=20 to 50 do
    If (i mod 3=0) and (i mod 5 <> 0) then writeln(i);
 end.
1
0 / 0 / 1
Регистрация: 03.01.2012
Сообщений: 32
04.01.2012, 00:55  [ТС] 3
спасибо
0
0 / 0 / 0
Регистрация: 15.10.2018
Сообщений: 13
11.12.2018, 05:10 4
А можно это в виде блок схемы?
0
Эксперт Pascal/Delphi
6636 / 4464 / 4746
Регистрация: 05.06.2014
Сообщений: 21,951
11.12.2018, 08:59 5
https://www.softsalad.ru/softw... y/fceditor
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.12.2018, 08:59

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Даны натуральные числа от -20 до 150. Напечатать те из них, которые делятся на 3, но не делятся на 5
Нужно решить эти задачи без массивов и с вхаил 1. Даны натуральные числа от -20 до 150. Напечатать...

Даны натуральные числа от 20 до 50.Напечатать те из них, которые делятся на 3,но не делятся на 5.
1)Даны натуральные числа от 20 до 50.Напечатать те из них, которые делятся на 3,но не делятся на 5....

Даны натуральные числа от 1 до 50. Найти суммы тех из них, которые делятся на 5 и на 7.
Даны натуральные числа от 1 до 50.Найти суммы тех из них, которые делятся на 5 и на 7. Функция

Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7
Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7. Буду...


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

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

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