Question

Решите пожалуйста 1. Запишите значение переменной a, полученное в результате работы следующей программы. var a, b: real; begin a := 6; b := 2; b := b+ 2 * a; a := a / 2 + 3 * b; writeln (a); end. 2. Запишите значение переменной s, полученное в результате работы следующей программы. Var s,k: integer; Begin s := 3; for k :=2 to 5 do s := s + 4; writeln(s); End. 3. Определите значение переменной b после выполнения алгоритма, записанного в виде программы или в виде фрагмента блок-схемы: Примечание: знаком := обозначена операция присваивания. var a, b: integer; a:=2; b:=0; while b<8 do begin b:=b+a; a:=a+2; end; write (a); end. b<8 нет выв. a да b:=b+a a:=a+2 a:=2 b:=0 4. Составьте программу, которая определяет профиль для дальнейшего обучения. Программа запрашивает баллы за экзамен по информатике, математике и физике. Если средний балл не менее 4, то должен выводиться комментарий «Информационный», в противном случае- общеобразовательный