kristinagaspa62

10.07.2022

Пользователь вводит 2 числа, если 1 число четное , то его нужно умножить на 2 , если нечетное, то умножить на 4.Вывести на экран.Программа Паскаль.

Информатика

Ответить

Ответы

ti2107

10.07.2022

ответ:Прикола с двумя числами не понял, если по итогу второе число не применяют!

var a,b,c:int64;

begin

readln(a);

b:=a mod 2;

if b = 0 then c:=a*2

else c:=a*4;

writeln('Итоговое число: ',c);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Пользователь вводит 2 числа, если 1 число четное , то его нужно умножить на 2 , если нечетное, то умножить на 4.Вывести на экран.Программа Паскаль.

▲

Пользователь вводит 2 числа, если 1 число четное , то его нужно умножить на 2 , если нечетное, то умножить на 4.Вывести на экран.Программа Паскаль.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

Дан одномерный массив с действительными числами. найти количество отрицательных элементов. нужно написать программу в delphi, pascal

Вычислить значение логических формул: 1) не а и не в2) (а и в) или не стаблицей там заранее

Програмисты ( pascal ) дана строка s и символ а. удвоить данный символ в строке (чтобы из 12ав получилось 1122аавв

не проходите мимо НАДО РЕШИТЬ НОМЕР 14, КРОМЕ 4) и 5)

Ввести число.если оно неотрицательное, вычесть из него 10, в противном случае прибавить к нему 10. составить программу

Здравствуйте! Мне нужно решить эти 2 задачи по информатике! Желательно как можно скорее

Из каких групп клавиш состоит клавиатура?

4. что будет выведено на экран в результате выполнения инструкции? a) n : =5; x : =0; for i: =1 to n do x: = i; writeln(x); b) n: = 1; while n < = 10 do begin x: = n*n; writeln (n : 6, ’ ‘ , x : ...

Составить программу преобразования натуральных числе, записанных в римской нумерации, в десятичную систему счисления. на паскале.

Зашифруйте пословицу о труде с колеса зашифровки! !

Как правильно заполнить ! если 7-литровую посуду наполнили водой, то какими способами можно набрать 1 л воды с посуды ёмкостью 7, 4, 3л?

Пользователь вводит 2 числа, если 1 число четное , то его нужно умножить на 2 , если нечетное, то умножить на 4.Вывести на экран.Программа Паскаль.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

Дан одномерный массив с действительными числами. найти количество отрицательных элементов. нужно написать программу в delphi, pascal

Вычислить значение логических формул: 1) не а и не в2) (а и в) или не стаблицей там заранее​

Програмисты ( pascal ) дана строка s и символ а. удвоить данный символ в строке (чтобы из 12ав получилось 1122аавв

не проходите мимо НАДО РЕШИТЬ НОМЕР 14, КРОМЕ 4) и 5)

Ввести число.если оно неотрицательное, вычесть из него 10, в противном случае прибавить к нему 10. составить программу ​

Здравствуйте! Мне нужно решить эти 2 задачи по информатике! Желательно как можно скорее

Из каких групп клавиш состоит клавиатура?

4. что будет выведено на экран в результате выполнения инструкции? a) n : =5; x : =0; for i: =1 to n do x: = i; writeln(x); b) n: = 1; while n &lt; = 10 do begin x: = n*n; writeln (n : 6, ’ ‘ , x : ...

Составить программу преобразования натуральных числе, записанных в римской нумерации, в десятичную систему счисления. на паскале.

Зашифруйте пословицу о труде с колеса зашифровки! !

Как правильно заполнить ! если 7-литровую посуду наполнили водой, то какими способами можно набрать 1 л воды с посуды ёмкостью 7, 4, 3л? ​

Вычислить значение логических формул: 1) не а и не в2) (а и в) или не стаблицей там заранее

Ввести число.если оно неотрицательное, вычесть из него 10, в противном случае прибавить к нему 10. составить программу

4. что будет выведено на экран в результате выполнения инструкции? a) n : =5; x : =0; for i: =1 to n do x: = i; writeln(x); b) n: = 1; while n < = 10 do begin x: = n*n; writeln (n : 6, ’ ‘ , x : ...

Как правильно заполнить ! если 7-литровую посуду наполнили водой, то какими способами можно набрать 1 л воды с посуды ёмкостью 7, 4, 3л?