Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.87/15: Рейтинг темы: голосов - 15, средняя оценка - 4.87
0 / 0 / 0
Регистрация: 10.01.2010
Сообщений: 5
1

Дано целое число N (> 1). Вывести наибольшее целое K...

10.01.2010, 23:40. Показов 3129. Ответов 1
Метки нет (Все метки)

Дано целое число N (> 1). Вывести наибольшее целое K, при котором выполняется неравенство 3K < N, и само значение 3K
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.01.2010, 23:40
Ответы с готовыми решениями:

Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство 3K < N.
Дано целое число N (&gt; 1). Найти наибольшее целое число K, при котором выполняется неравенство...

Дано целое число N(>1) вывести на именьшее целое K,при котором выполняется неравенство
Дано целое число N(&gt;1) вывести на именьшее целое K,при котором выполняется неравенство 3K&gt;N, и...

Дано целое число. Вывести его строку-описание вида «отрицательное четное число», «нулевое число »,« положительное нечетн
Дано целое число. Вывести его строку-описание вида «отрицательное четное число», «нулевое число...

Дано целое число N (> 1). Вывести последовательность чисел Фибоначчи Fk
Дано целое число N (&gt; 1). Последовательность чисел Фибоначчи Fk до (целого типа) определяется...

1
Платежеспособный зверь
8754 / 4185 / 1608
Регистрация: 28.10.2009
Сообщений: 11,324
10.01.2010, 23:46 2
Лучший ответ Сообщение было отмечено Insomn1a как решение

Решение

Цитата Сообщение от Insomn1a Посмотреть сообщение
Дано целое число N (> 1). Вывести наибольшее целое K, при котором выполняется неравенство 3K < N, и само значение 3K
Pascal
1
2
3
4
5
6
7
8
9
10
var
n,k:integer;
begin
writeln('vvedite N');
readln(n);
if n mod 3=0 then k:=(n div 3)-1 else k:=n div 3;
writeln('k=',k);
writeln('3k=',k*3);
readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.01.2010, 23:46

Дано вещественное число A и целое число N (> 0). Используя один цикл, вывести все целые степени числа A от 1 до N.
Дано вещественное число A и целое число N (&gt; 0). Используя один цикл, вывести все целые степени...

Дано целое число n. Вывести числа от 2 до 11, на которые поделится данное число (используя только признаки делимости)
Дано целое число n. Вывести числа от 2 до 11, на которые поделится данное число (используя только...

Дано целое число. Вывести строку — название соответствующей цифры
Плииииииииииз спасите мою шкуру......... Вариант 15. 3. Дано целое число в диапазоне 0 – 9....

Дано целое число N и набор из N вещественных чисел: A1, A2, ..., AN. Вывести: A1N, A2N–1, ..., AN–12, AN
Дано целое число N и набор из N вещественных чисел: A1, A2, ..., AN. Вывести следующие числа: A1N,...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru