Составьте программу на языке паскаль,с ветвлящейся структурой которая определяет четное или нечетное введенное число
5-9 класс
|
var
a:integer;
begin
readln (a);
if (a mod 2=0) then writeln ('Четное')
else
writeln ('Не четное');
end.
Другие вопросы из категории
предположения:
а) фирма C получит максимальную прибыль, если максимальную прибыль получит фирма B или не получит фирма A;
б) чтобы фирма C не получила максимальную прибыль, необходимо, чтобы и фирма A не получила максимальную прибыль.
Сумеет ли фирма А получить максимальную прибыль?
значений Х=К метров и Y , изменяющегося от 2 до 3 метров с шагом Н метров.
Желательно, чтобы был алгоритм или блок-схема...
Найти гипотенузу треугольника.
Помогите пж, и поняятно пишите.
нуужно срочно до завтра!
Заранее большущее спасибо)
Читайте также
заканчивается числом 0).
вычисления: а) y=x^10 б) y=x^15. Постараться использовать минимальное количество дополнительных переменных. 2) Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и описанной окружностей. Программу записать на языке Паскаль. 3) Дана величина А, выражающая объём информации в байтах. Перевести А в более крупные единицы измерения информации. Программу записать на языке Паскаль
19(16,3+7,7).а)19(16.3+7.7),в)19*(16.3+7.7).д)19(16,3+7.7).с)19*(16.3+7.7).2)Найдите правильную на языке паскаль записы выраженияа)34.5+24.5/15у в)(34.5+24.5)/15у с)(34.5+24.5)15*у.д)(34.5+24.5)/(15*у).3)Вычислите длину окружности и площадь круга одного и того же заданного радиуса R.4)Даны два числа.Найдите среднее арифметическое кубов этих чисел и среденее геометрическое модулей этих чисел.Два последних номера там нужно написать программу,программу присылать на листочке
на вечернее,от 8 до 9 на заочное,менее 8 балов отказано от приема на учебу.