Что выведет на экран следующая программа?

Begin

Write ("Я учусь в") ;

Write (2*3+5) ;

WriteLn ("классе.") ;

Write ("Мне","16","лет.") ;

WriteLn;

WriteLn ("Я знаю, что","2*2=") ;

Write ((6*6-12) / 6) ;

End

Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln (' введи номер месяца ') ; readln (N_M) ; case N_M of 1:writeln (' январь ') ; 2:writeln (' февраль ') ;

Выдаёт ошибку: операнды имеют неприводимые типы. Где я ошиблась? (Программа написана на языке Pascal ABC) Program Home; Uses CRT; Var a: integer; b: real; Begin WriteLn ('Введите еденицу измереня: килограмм, миллиграмм, грамм, тонна, центнер') ;

Что выведет следующая программа? Объясните результат. program test; var a, b: integer; procedure p (Var x:integer; y:integer) ; begin x:=x+1; y:=x+y; end; begin a:=1; b:=2; p (a, b) ; writeln (a,' ', b) ; p (a, b) ; writeln (a,' ', b) ; readln; end.

Сколько раз будет выполнен этот цикл? i:=2; while i

Дано три цифры вывести все возможные трехзначные числа пишет ожидался оператор begin program: adf; begin var a, b, c : = in tege; begin writeln ('write') ; read (a, b, c) ; writeln (a, b) ; writeln (b, a) ; writeln (a, c) ; writeln (c, a) ;