Предмет: Информатика, автор: antohaqwe123

НАпишите программу вывода четных чисел от 2 до 100 включительно

Ответы

Автор ответа: Twyla27
0
const N=99;              var A: array[1..N] of integer;               i:integer;          begin            for i:=1 to N do             A[i]:=i+1;           for i:=1 to N do     if A[i] mod 2=0 then writeln(A[i]);           end.           
Автор ответа: Twyla27
0
const N=99;
var A: array[1..N] of integer;
i:integer;
begin
for i:=1 to N do
A[i]:=i+1;
for i:=1 to N do
if A[i] mod 2=0 then writeln(A[i]);
end.
Похожие вопросы
Предмет: Математика, автор: Аноним
Предмет: Право, автор: arcatowaanastasia
Семья Николаевых взяла в дом безнадзорную собаку. Она была с ошейником и Николаевы сочли необходимым дать объявление и зая¬вить в орган местного самоуправления о происшедшем.
Никто не откликнулся. Постепенно собака привыкла к новым хо¬зяевам, прошло более полугода. Однажды во время прогулки собака встретила настоящую хозяйку и стала рваться с поводка, устремив¬шись к ней.
Бывшая хозяйка Волчкова выразила желание взять собаку и уп¬латить за ее кормление. Николаева предложила урегулировать эти от¬ношения в мировом суде. Она объяснила, что собака в первые дни своего пребывания в новом доме укусила зашедшего к ним соседа, очевидно демонстрируя добросовестную службу. Николаевы вынуж¬дены были оплатить соседу лечение и компенсировать его моральные и физические страдания. В подтверждение Николаевы готовы предъ¬явить расписку соседа о получении от них в качестве компенсации 8 тыс. рублей. Они полагали, что Волчкова, желая забрать собаку, должна возместить понесенные ими убытки. От оплаты Волчкова от¬казалась, считая, что это происшествие не имело к ней никакого отно¬шения.
В результате Волчкова обратилась в суд с иском о возврате соба¬ки, а Николаевы — со встречным — о возмещении расходов на содер¬жание, включая выплаты соседу, однако они не просили взыскать воз¬награждение за пребывание собаки в доме.
Возникло ли у Николаевых право собственности на собаку? Имеет ли право Волчкова на истребование собаки? Вынесите решение по делу.