Составить программу , которая уменьшает первое число в два раза а второе увеличивает на 1 если первое больше 2

не верно.

Поставь ';' где надо

сама логика не верна.

VarA,d:integerBegin Read(a);Read(d)Write(a*2);Begin If (a>d) then Write(d+1)End;End.

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) Код на vbdim a as integer = 0dim b as integer = 0a = cint(console.readline())b = cint(console.readline())if a > 2 thenconsole.writeline( a / 2)console.writeline(b - 1)end if