2.Вычислить y={3,если x-1>/ ,4,если x-1<0 помогите пожалуйста!!! :)
10-11 класс
|
Если я правильно понял условие: y=3 при x-1>0 и y=4 при x-1<0 (при этом не сказано, что делать при x-1=0), то решение будет выглядеть так (если требуется написать программу на паскале):
Var x,y:integer;
Begin
write('x=);
readln(x);
if (x-1)>0 then y:=3;
if (x-1)<0 then y:=4;
writeln('y=',y);
End.
Но я бы посоветовал изменить строку if (x-1)>0 на if (x-1)>=0, иначе при (x-1)=0 программа будет работать некорректно.
Другие вопросы из категории
на «4» и «5»?
Найти минимальное число из 10 случайных чисел. Диапазон генерации случайного числа задается
пользователем в начале работы программы.
(использовать форматированный ввод/вывод)
Читайте также
значение Х с соответствующим сообщением, если нет, то выведите на печать "нет".
Помогите, пожалуйста, очень нужно)
2*i>+1 / <знаменатель>2*i+1
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
все элементы этого массива на квадрат минимального элемента данного вектора, а если А[1]<0, то умножить все элементы на квадрат максимального элемента вектора. Полученный массив распечатать. Значение К вводится пользователем.
форму параллелепипеда A, B, C. Вычислить объем детали v, объем тары V, необходимое количество тары N для упаковки деталей количеством K штук. Если N>10, то вычислить отношение объема детали к объему тары .
Помогите пожалуйста написать это В Паскале.