Предмет:
ИнформатикаАвтор:
charlesАвтор:
grizzlygallagherАвтор:
kiangatesАвтор:
kobe1.
var
a : integer;
begin
write('введите число: ');
readln(a);
if a mod 2 = 0 then writeln('четное') else writeln('нечетное');
end.
2.
var
x, y : integer;
begin
write('введите x=');
readln(x);
y := x;
writeln('y=', y);
end.
во второй задаче не было указано как считать Y поэтому я просто сделал его равным X. нужную формулу напишешь сам
Автор:
genesisgbggДобавить свой ответ
Предмет:
МатематикаАвтор:
bayleeОтветов:
Смотреть
Предмет:
ЛитератураАвтор:
elijahgtjoОтветов:
Смотреть
Предмет:
ОбществознаниеАвтор:
peepОтветов:
Смотреть
Предмет:
Қазақ тiлiАвтор:
demetriuscervantesОтветов:
Смотреть