1)даны два числа а и в на 10 . выбрать большее из них и удвоить . 2)увеличить число а на 10 , если оно положительное , в другом случае уменьшить .

1) var a,b: integer; begin readln(a,b); if a> b then writeln(a*2); if b> a then writeln(b*2); end. 2) var a: integer; begin readln(a); if a> 0 then writeln(a+10); if a< 0 then writeln(a-10); end. надеюсь на лучший ответ

Честно говоря, какой-то странный код. во-первых, после 0 (во второй строке) должно стоять двоеточие и, во-вторых, лично у меня функции записаные с большой буквы, не работают. как я понимаю, эта программа должна искать чётные числа от 0 до 10 (мне выдаёт 2,4,6,8,10). она работает так: цыклу for переменной i надаётся значение от 0 до 9 (функцией range( дальше проверяется есть ли число i чётным (i%2==0). функция not по сути делает противоположное: проверяет есть ли это число нечётным. тогда если оно нечётнон, выводится на екран число на один больше него (т.е. чётное). я бы написал эту программу так: for i in range(1, 11): if i % 2 == 0: print(i) по сути она выводит то же самое, но код немного менше и понятней. p.s. эти программы не в ответе 0, хотя 0 - тоже парное число. чтобы она выдавала еще и 0, просто надо убрать первый аргумент функции range(): for i in range(11): if i % 2 == 0: print(i) тогда она выведет 0,2,4,6,8,10.

Если нажать комбинацию shift+alt+d, то будет вставлена текущая дата. если набрать в редакторе =lorem() и нажать enter, то вместо этой команды появится кусок текста из lorem ipsum. если в процессе работы над документом нажать f4, то word повторит последнюю команду (если вы до этого поставили точку, то он еще раз поставит точку и т. если набрать в редакторе =rand.old(5,4) и нажать enter, то вместо этой команды появятся пять абзацев, в каждом из которых четыре раза повторится предложение перекусить. если выделить кусок текста и нажать комбинацию shift+f3, то изменится регистр для всего этого куска (весь текст станет набран заглавными, а если нажать еще раз, то строчными буквами). если набрать в редакторе =rand(1) и нажать enter, то вместо этой команды появится случайный абзац из справки. если набрать в редакторе =rand(5) и нажать enter, то вместо этой команды появятся пять случайных абзацев из справки.