За единицу количества информации принимается

Question

Информатика: За единицу количества информации принимается

Lusihvostfei · Accepted Answer

1) файл паскаля приложен.
2) код на c#
static void Main(string[] args) { int a, b; a = Convert.ToInt32(Console.ReadLine()); b = Convert.ToInt32(Console.ReadLine()); if (a > 2) { Console.WriteLine(a / 2); Console.WriteLine(b - 1); } }
3) Код на vb
dim a as integer = 0
dim b as integer = 0
a = cint(console.readline())
b = cint(console.readline())
if a > 2 then
console.writeline( a / 2)
console.writeline(b - 1)
end if

MOGZ ответил