1. Информатика
  2. Написать программу которая

Написать программу которая сравнивала бы его с 0 и положительное число увеличила в 2 раза а отрицательное увеличила бы в 3

fhdhkfhydkfhs fhdhkfhydkfhs    1   17.07.2019 19:20    0

Ответы
cikitka2 cikitka2  07.08.2020 08:49
Program If0;Vara,b,c:Integer;Begin WriteLn('Ввести отрицательное или положительное число');ReadLn(a);If a>0Then b:=a*2 Else b:=a*3;Write(b);End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
alladzyurich alladzyurich  09.06.2019 08:00
1) сколько секунд потребуется модему, сообщения со скоростью 14400 бит/с, чтобы передать цветное растровое изображение размером 640 на 480 пикселей, при условии,...
kislayaya13 kislayaya13  09.06.2019 08:00
Дано 3-х значное число 121,разбить его на три числа 1,2,1...
Angel2к17 Angel2к17  09.06.2019 08:00
Паскаль: дано 3-х значное число 121,разбить его на три числа 1,2,1...
Nikitaue Nikitaue  09.06.2019 08:00
Cколько символов на одной странице в книге если в ней 60 страниц а вся книга занимает 360 кбайт?...
tanyagrandf tanyagrandf  09.06.2019 08:00
Скорость передачи данных равна 140000 бит/с. файл какого объема будет передан за время 1 мин?...
Natalym2001 Natalym2001  09.06.2019 08:00
Найдите количество элементов двумерного массива a[1..5,1..5] равных 1. массив заполните случайными числами в диапазоне от -10 до 10. вывести массив на экран в виде...
Messi294 Messi294  09.06.2019 08:00
1.какое расширение имеют файлы-программы: а).ini, .cpp б).txt, .doc в).exe, .com г).wmf, .dll 2.для создания базы данных следует выбрать команды: а)создать б)открыть...
Valik123211 Valik123211  09.06.2019 08:00
Растровое изображение размером пикселя занимает 4 килобайта памяти. максимальное количество цветов, используемых в изображении, равно...
vladik1501 vladik1501  09.06.2019 08:00
Проводилась одноканальная (моно) звукозапись с частотой дискретизации 16 кгц и 32-битным разрешением. в результате был получен файл размером 1 мбайт, сжатие данных...
Vil67 Vil67  09.06.2019 08:00
28. определите значения переменных i и s после выполнения фрагмента алгоритма на алгоритмическом языке: s : = 0; i : = 5; пока i 0 повторять нц s : = s + i ; i :...

Популярные вопросы