сервис вопросов и ответовЗнаю примерно как решать ,но не выводится на программе Паскаль(1.Увеличить переменную f 6 раз,если f нечётное число,иначе увеличить на 29.2.Факториал числа
5-9 класс|
|
Tutituti
24 дек. 2013 г., 2:02:03 (10 лет назад)
Ника55
24 дек. 2013 г., 3:51:46 (10 лет назад)
1.
var f:integer;
begin
read(f);
if f mod 2<>0 then
f:=6*f
else
f:=f+29;
writeln(f);
end.
2.
var i,n,k:integer;
begin
read(n);
k:=1;
for i:=2 to n do
k:=k*i;
writeln(k);
end.
Ответить
Другие вопросы из категории
Читайте также
Помогите, с помощью паскаля надо сделать следующее:
Составить программу, решающую следующую задачу: дано трехзначное число. В нем зачеркнули первую цифру слева и приписали ее справа. Вывести полученное число.
Так же:
Составить программу, решающую следующую задачу: дан номер некоторого года (целое положительное число). Определить соотв-щий ему номер столетия, учитывая, что, к примеру, началом 20го столетия был 1901 год. Сам то я знаю как решать, но не смогу записать это в паскаль!
помогите решить задачи по информатике (на уровне знаний 7 класса) с помощю PascalABC
1. Дано 2 числа найти модуль разности этих чисел увеличенный в 5 раз.
2. Дано 4 значное число поменять местами 1 и 2 цифру местами
3. Дан диаметр круга найти его площадь (формула S=п*R).
Я примерно знаю как писать но всеровно нуждаюсь в помощи
Мои мысли:
program z1;
uses crt;
var ... : integer;
begin
дальше всё в тумане
буду рад за решённые 1 или 2 задачи
РебяТ помогите очень надо, решит не могу не был на уроках, а она мне дала задачу.
Массив содержит 20 случайных чисел из промежутка [1..37] Выводит на экран эдементы больше 11, но меньше 22 ПОжалуйста помогите)
1)Вывести на экран квадраты и кубы нечётных целых чисел от 9 до 1.
2)Даны натуральные числа от 1 до 150. Найти сумму тех из них, которые делятся на 5 или на 7.
3)Напечатать те из чисел от 10 до 50, которые делятся на 4, но не делятся на 6
4)Найти произведение нечетных чисел от 10 до 50, кратных 13
кто может сделать в Паскале или просто решить?
Играют двое . Первый игрок называет любое число но не выше 10 . Второй прибовляет к названаму числу число не выше 10 и сообщает сумму . 1-й к этой сумме
он прибовляет число но не меньше 10 и т.д. до тех пор , пока ок. Суммой не окажется 100.Выигравает тот , кто первым достигает 100. Как должен действовать первый игрок , чтобы выйграть .
Вы находитесь на странице вопроса "Знаю примерно как решать ,но не выводится на программе Паскаль(1.Увеличить переменную f 6 раз,если f нечётное число,иначе увеличить на 29.2.Факториал числа", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.