Ребята, помогите, очень важно. Пользователь вводит целое число x. Если число положительное – выполняется расчёт x4, если отрицательное x3.
5-9 класс
|
Используется только одна подпрограмма-функция паскаль.
program p;
var x: integer;
begin
writeln("Введите число: ");
readln(x);
if x>0 then x:=x*4 else x:=x*3;
writeln("Ответ: ",x); readln; end.
Другие вопросы из категории
табло , чтобы с его помощью можно было бы передать 15 разных сигналов?
А) Paint
B) Photoshop
C) Corel Draw
D) ни одна из них
количеству собранных овощей. Дневная норма сбора составляет k килограммов. Сбор 1 кг помидоров стоит m рублей. Сбор каждого килограмма сверх нормы оплачивается в 2 раза дороже. Сколько денег в день получит каждый рабочий за собранный урожай.
Читайте также
чисел, вводимых с клавиатуры, на 3. Паскаль.Рекурсия
напечатать исходное число
Вывести A в степени N: An = A•A•...•A (числа A перемножаются N раз). 2.Дано вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N. 3.Дано вещественное число A и целое число N (> 0). Вывести 1 + A + A2 + A3 + ... + An. ,
2.С клавиатуры вводится действительное число p.Записать отдельно его целую часть C.
Помогите составить программу.