1. Обусловьте, каким числом является введённое число чётнымили нечётным.2. Напишите
1. Определите, каким числом является введённое число чётным
либо нечётным.
2. Напишите программку, которая в
зависимости от введённого числа или вычисляет функцию, или выдает извещенье,
что функция не определена:
3. Проверьте, является ли данное четырёхзначное число
палиндромом. Палиндромом именуется число, которое читается слева вправо также
как справа налево.
4. Вычислите значение последующей функции:
Задать свой вопрос
Николай Крупенчиков
2 задание расплывчатое
Мнацаканян
Любовь
остальное - сделаю)
Алена
2 задание это то
Амина Окольнишникова
которое 4?)
Диана Гараненко
2. Напишите программку, которая взависимости от введённого числа или вычисляет функцию, или выдает извещение,что функция не определена:y = 1/x
Карина Болкунова
ну, функция у = один деленное на х
Диана
что значит " в зависимости от введенного числа" ? какое условие то?)
Владимир Матаров
я сбросила все,как написано в задание)
Larisa Veremchek
*задании
1 ответ
Никита Качмала
1.
var n:integer;
begin
readln(n);
if n mod 2 = 0 then
writeln('Четное')
else
writeln('Ну четное');
end.
2.
var n:integer;
begin
readln(n);
if nlt;gt;0 then
writeln('y=',1/n)
else
writeln('функция не определена');
end.
3.
var numb,ts,sot,des,ed:integer;
begin
readln(numb);
ts:=numb div 1000;
sot:= numb div 100;
sot:= sot mod 10;
des:=numb mod 100;
des:=des div 10;
ed:=numb mod 10;
if (ed*1000+des*100+sot*10+ts) = numb then
writeln('палиндром');
end.
4.
var x:real;
begin
readln(x);
if xgt;=2 then
writeln(x)
else
writeln(sqr(x)-3);
end.
var n:integer;
begin
readln(n);
if n mod 2 = 0 then
writeln('Четное')
else
writeln('Ну четное');
end.
2.
var n:integer;
begin
readln(n);
if nlt;gt;0 then
writeln('y=',1/n)
else
writeln('функция не определена');
end.
3.
var numb,ts,sot,des,ed:integer;
begin
readln(numb);
ts:=numb div 1000;
sot:= numb div 100;
sot:= sot mod 10;
des:=numb mod 100;
des:=des div 10;
ed:=numb mod 10;
if (ed*1000+des*100+sot*10+ts) = numb then
writeln('палиндром');
end.
4.
var x:real;
begin
readln(x);
if xgt;=2 then
writeln(x)
else
writeln(sqr(x)-3);
end.
Никита Быштырев
спасибо громадное!!)
Алеша Смыгунов
агась :ь обращайся)
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Облако тегов