2-плата
3-принтер
8-мышь
только это знаю(
//PascalABC.NET 3.2 cборка 1318
Var
a,b,c:integer;
begin
readln(a,b,c);
if (a mod 5=0) and (c mod 5=0) and (b mod 5<>0) then
writeln(sqr(a),' ',sqr(b),' ',sqr(c)) else
if (a mod 5<>0) and (c mod 5<>0) and (b mod 5=0) then
writeln(a+10,' ',b+10,' ',c+10)
else
writeln((a+b+c)/3);
end.
Пример ввода:
15
5
34
Пример вывода:
18
A и b - это, я так понял, x и y? Тогда так.
П1 <-> П0 3 <-> x^y 2 , 5 ИП0 ИП1 * * - 1 , 7 8 ИП0 x^2 * + 2 , 5 ИП1 * - 1 + С/П
А) металл ;цифровая
б) бумага (картон); цифровая (индекс), текстовая, графическая
в) бумага; текстовая, цифровая
г) бумага; цифровая, текстовая, графическая
д)оптический или цифровой диск; видео, аудио.
насчет диска точно не знаю, извини))