Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число. Задачку
5-9 класс
|
нужно решить в рандоме!! ! :(
var x,y: integer;
begin x:= -10+random(20);
if x>0 then y:=x+1 else y:=x;
writeln('Число ',x,' результат ',y);
end.
Nov09 Zill.yJust had a look at your page with my almost 4 year old – he was all excited and asked, when we would go over to your house to play with the kids ;)Cheers from WA. Love your wo/RkZill.y!eply
Другие вопросы из категории
2. Для хранения растрового изображения 128х128 pix отвели 4Kb памяти. Каково число цветов в изображении?
равен 500; второй равен целой части квадратного корня из предыдущего элемента; третий равен целой части от деления текущего индекса на три части (если она равна нулю,то соответствующий элемент массива делать равным 1)
Привычка свыше нам дана:Замена счастию она.
Читайте также
(язык программирования паскаль)
помогите, пипец как надо!!!
нулевым, *то* ""заменить *его* на 10. Вывести полученное *число*.
Срочнооо
f3.
Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 2; если нулевым, то заменить его на 10. Вывести полученное число.
f5.
Даны три целых числа. Найти количество положительных и количество
отрицательных чисел в исходном наборе.
f15.
Даны три числа. Найти сумму двух наибольших из них.