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

Дано целое число N>0.Если оно являеться степенью числа 3, то вывести True,если не являеться-вывести false.

19.12.2010, 23:25. Показов 2602. Ответов 1
Метки нет (Все метки)

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

Если число является степенью числа 3, то вывести True, если нет, то False
Дано целое число N (> 0). Если оно есть степенью числа 3, то вывести TRUE, если нет, то False...

Цикл: Если число ялвляется степенью числа 3, то вывести TRUE а если не является - False
помогите задачку на паскале решить через while!!!!!!!!!! Дано целое число N (>0). Если оно...

While: Если число является степенью числа 3, то вывести True
Условие: Дано целое число N (>0). Если оно является степенью числа 3, то вывести True, если не...

Дано целое число N (> 1). Если оно простое, то вывести сообщение: «Число N простое», иначе вывести сумму делителей
1) Дано целое число N (> 1). Если оно простое, то вывести сообщение: «Число N простое», иначе...

1
76 / 76 / 51
Регистрация: 28.02.2010
Сообщений: 159
19.12.2010, 23:41 2
Лучший ответ Сообщение было отмечено LirikY как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var n,a:integer;
 
Begin
write('N= ');readln(n);
a:=1;
Repeat
a:=a*3;
 
Until (a=n) or (a>n);
 
if a=n then writeln('true')
else
writeln(false);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.12.2010, 23:41

Если в наборе имеется числа меньше к, то вывести true, если нет - false
1) n>0 .Найти сумму n*n+(n+2)*(n+2)+...+(2*n)*(2*n) 2)n>1.Вывести наименьшее из целых чисел k,для...

Дано целое число.если оно евляется положительным то прибаветь к нему 1,в противном случае вычесть из него 2.вывести полученое число
Дано целое число.если оно евляется положительным то прибаветь к нему 1,в противном случае вычесть...

Если в наборе имеются числа, меньшие K, то вывести TRUE, в противном случае вывести FALSE
Pascal. Даны целые числа K, N и набор из N целых чисел. Если в наборе имеются числа, меньшие K, то...

Дано целое число N>0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE
Дано целое число N>0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE


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

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

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