var
a,b,c:integer;
begin
readln(a); readln(b); readln(c);
if a mod 2 <> 0 then
Writeln('Первое нечетное')
else if a mod 2 = 0 then
Writeln('Первое четное');
if b mod 2 <> 0 then
Writeln('Второе нечетное')
else if b mod 2 = 0 then
Writeln('Второе четное');
if c mod 2 <> 0 then
Writeln('Третие нечетное')
else if c mod 2 = 0 then
Writeln('Третие четное');
end.
За месяц вирус А заполнит 1 Гб, за этот же месяц: вирус В заполнит 0,5 Гб, вирус С Гб, вирус D Гб.
1 + 0,5 + + = 2 Гб
Ответ: 2