дано целое число .Если оно является положительным,то умножить его на 3;в противном случае не изменять его.Вывести полученное число.
10-11 класс
|
uses crt;
var n:integer;
begin
clrscr;
write('n = '); readln(n);
if(n>=0) then n:=n*3;
writeln(n);
readln
end.
Другие вопросы из категории
неотрицательные a и b, что 3a +5b = n.
Нужно написать на делфи
№2 Информационный объем сообщения 4096 бит содержит 1024 символа. Какова мощность алфавита, с помощью которого составлено это сообщение?
№4 Какова мощность алфавита, с помощью которого записано сообщение, содержащее 4096 символов, если его объем составляет 1,5 Кбайта?
№ сколько символов содержит сообщение, записанное с помощью 16-ти символьного алфавита, если объем его составил 1/64 часть Мбайта?
№6 Сообщение занимает 4 страницы по 30 строк. В каждой строке по 50 символов. Все сообщение содержит информации в 4500 байт. Какова мощность используемого алфавита?
№ 7 ДНК человека (генетический код) можно представить себе как некоторое слово в четырехбуквенном алфавите, где каж¬дой буквой помечается звено цепи ДНК, или нуклеотид. Сколько информации (в битах) содержит ДНК человека, содержащий примерно 1,5 х 1023 нуклеотидов?
Читайте также
Написать программу для Pascal.
Дано целое число, если оно является положительным, то прибавь к нему 5; в противном случае не изменять его. Вывести полученное число.
этих фотография снизу
Вывести полученное число
пожалуйста на c++