1. Информатика
  2. Ввести число если оно четное разделить

Ввести число если оно четное разделить его на 4 если не четное умножить на 5

Викусёк1101 Викусёк1101    3   11.07.2019 15:30    7

Ответы
Ekaterinazuzu Ekaterinazuzu  31.07.2020 11:51
Pascal abc
ПОКАЗАТЬ ОТВЕТЫ
polina1329 polina1329  31.07.2020 11:51
Var A : Integer;
Begin
  Readln(A);
  If Odd(A) then A:=A*5 else A:=A div 4;
  Writeln(A);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Minenub Minenub  10.07.2019 21:50
Производилась двухканальная (стерео) звукозапись с частотой дискретизации 64 кгц и 24-битным разрешением. в результате был получен файл размером 48 мбайт, сжатие данных не производилось....
iloveyou27 iloveyou27  23.11.2020 15:54
Деректер формптын озгертудын екы тасылы?​...
Мосендз Мосендз  16.08.2019 05:10
Объем оперативной памяти компьютера 8 гбайт. сколько страниц текста можно разместить в памяти этого компьютера (на странице размещается 40 строк по 60 символов в каждой строке, а...
Алексвоин124 Алексвоин124  16.08.2019 05:10
Введите с клавиатуры одномерный массив s(k), элементами которого являются положительные и отрицательные числа. найдите среднее арифметическое значение среди последних 9-ти элементов...
Альбина1597 Альбина1597  16.08.2019 05:10
1) выполнить вычитание двоичных чисел замены вычитания сложение с дополнительным кодом а) 1000011-101 б) 10101-1010 2)перевести числа из 2-ой сс в 8-ую, 16-ую сс использую триады...
verka000 verka000  16.08.2019 05:10
Написать программу в паскаль: в велогонке принимают участие двое велосипедистов. скорость первого 35 км/ч, скорость второго 30 км/ч. определить насколько позже второй велосипедист...
semachelovekgood2 semachelovekgood2  07.07.2019 19:50
Взаданном массиве а(17) заменить все нулевые элементы средним арифметическим значением, найденным из всех отрицательных элементов массива. преобразованный массив вывести на печать....
Nastjadd Nastjadd  07.07.2019 19:50
Pascal)) составить программу которая выводит на экран бегущую строку...
ElenaBkv ElenaBkv  07.07.2019 19:50
Ввести массив a(n). найти максимальный элемент массива, произведение нечетных элементов массива. заменить максимум на произведение. вывести полученный массив и произведение....
рута2 рута2  12.05.2020 12:19
Император Траян развернул в Риме масштабное строительство. Почти все новые постройки назывались в его честь. Отметьте постройки Траяна. 1 1 Акведук 2Колизей 3Термы 4Колонна 5Дорога...

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