Предмет: Информатика, автор: таалайгул

Необходимо ввести некоторое целое число и если оно четное уменьшить его в 2 раза.Составить программу на Паскаль

Ответы

Автор ответа: SmartCin4376

var
a:longint;
begin
read(a);
if (a mod 2 = 0) then
a:= a div 2;
writeln(a);
end.

Интересные вопросы

Предмет: Геометрия, автор: catherinedmitrievna

Через вершину А прямоугольного треугольника АВС с прямым углом С проведена прямая АD, перпендикулярная к плоскости треугольника. А)докажите, что треугольник CBD прямоугольный.
В) найдите BD, если ВС=9 см, DC=12 см.

6 лет назад

Предмет: Экономика, автор: sjsudg638

5. По дебетовой карте расходный лимит определяется:
а) степенью платежеспособности клиента;
б) суммой остатка средств на счете карты;
в) фиксированным для всех клиентов данного банка;
г) платежной системой.
6. По кредитной карте расходный лимит определяется:
а) степенью платежеспособности клиента;
б) суммой остатка средств на счете карты;
в) фиксированным для всех клиентов данного банка;
г) банком в соответствии с условиями кредитного договора.
7. Срочные депозиты открываются:
а) на неопределенный срок;
б) на короткие сроки до одного месяца;
В) на конкретные сроки, устанавливаемые банком по договоренности с вкладчиком;
г) для срочного снятия денег.
8. Индекс потребительских цен — это параметр, который:
а) отражает уровень инфляции в стране;
б) указывает на степень роста расходов населения;
в) влияет на доходы населения;
г) характеризует спрос на товары потребления.

6 лет назад

Предмет: Математика, автор: asarajmanov

помогите пжпжпжпжпжпж

6 лет назад

Предмет: Алгебра, автор: CelldwellerSyb

4) (x+3)^2=(x-5)^2
....................

9 лет назад

Предмет: Химия, автор: Сергейsergo

между атомами элементов с атомными номерами 8 и 16 возникает связь 1)металлическая 2)ионная 3)ковалентная 4)водородная

9 лет назад