Вводится число, если это число отрицательное, то его надо умножить на 100, если положительное, то прибавить 100
5-9 класс
|
program s;
var a,b:integer;
begin
readln(a);
if(a < 0 )then a:= a * 100
else a:= a + 100;
writeln(a);
readln;
end.
Другие вопросы из категории
должен получить ребёнок, если он будет читать текст 45 минут (ответ дайте в Кбайтах_ Варианты ответа : 1)4,6 2)5,6 3)4,7 4)5,7
31
3
5
9
17
32
64
128
Кому не лень :)
Заранее спасибо :3
Читайте также
трехзначное и делится либо на 7, либо на 11, то его разделить на цело на 11. В остальных случаях разделить число на 10. ( сделать с помощью программы Pascal) Заранее огромное спасибо))))
с клавиатуры вводится число х. если остаток от деления х на 6 равен 2, то значение f(x)=4*x^2 если остаток от деления х на 6 равен 3, то значение f(x) = корень из х , если остаток от деления на 6 =0 то f(x) = x.
Написать программу в паскале используя операторы if и else . Нарисовать блок схему
a,b,c,d.Выяснить произведение этих чисел больше 300? 3)Дано целое число ,если оно положительное,то прибавить к нему 1,а если отрицательное.то отнять от него 2.Вывести полученое число.
уменьшает его на 2. Запишите порядок команд в программе преобразования числа 3 в число 23, содержащей не более 4 команд, указывая лишь номера команд. (Например, 21211 -- это программа умножь на 3 прибавь 1 умножь на 3 прибавь 1 прибавь 1, которая преобразует число 1 в 14.) (Если таких программ более одной, то запишите любую из них Можно с объяснением