Найдите значение переменной А после выполнения программы VAR A : INTEGER BEGIN A : = SQRT(16) : END?

KatuyshaBel 22 авг. 2020 г., 00:02:48

Sqrt(16) это 16 под корнем, получается ответ 4.

ЛуизаDance 13 июл. 2020 г., 19:01:33 | 5 - 9 классы

Запишите значение переменной у , полученное в результате работы следующей программы : var s, n : integer ; begin s : = 2 ; For n : = 2 to 5 do s : = s * 2 + n ; Writeln(s) ; End?

Запишите значение переменной у , полученное в результате работы следующей программы : var s, n : integer ; begin s : = 2 ; For n : = 2 to 5 do s : = s * 2 + n ; Writeln(s) ; End.

Maksimkinaa 14 февр. 2020 г., 18:57:50 | 5 - 9 классы

Что будет выведено на экран в результате выполнения программы?

Что будет выведено на экран в результате выполнения программы?

Var m, n, p : integer ; Begin For i : = 1 to 10 do Writeln(7, ’ * ’, I : 2, ’ = ’, 7 * I : 2) ; end.

Ведьм 5 окт. 2020 г., 05:21:21 | 5 - 9 классы

Определить какое значение будет принимать переменная y после выполнения фрагментов программы Var x, y : integer ; Begin y : = 0 ; x : = 10 While x> ; 0 do begin x : = x - 2 ; y : = y + x end ; Write?

Определить какое значение будет принимать переменная y после выполнения фрагментов программы Var x, y : integer ; Begin y : = 0 ; x : = 10 While x> ; 0 do begin x : = x - 2 ; y : = y + x end ; Writeln(`y = ` , y ) end.

Подробно плииз до завтра.

Ghonika 7 дек. 2020 г., 23:54:29 | 5 - 9 классы

Запишите значение переменной s, полученное в результате работы следующей программы?

Запишите значение переменной s, полученное в результате работы следующей программы.

Var s, k : integer ; Begin s : = 0 ; for k : = 1 to 11 do s : = s + 12 ; write(s) ; End.

ДимаDima11 15 апр. 2020 г., 14:00:22 | 5 - 9 классы

Var s, k : integer ; begin s : = 0 ; for k : = 3 to 7 do s : = s + 6 ; writeln(s) ; end?

Var s, k : integer ; begin s : = 0 ; for k : = 3 to 7 do s : = s + 6 ; writeln(s) ; end.

Запишите значение переменной S, полученное в результате работы этой программы.

Tatiana92 9 мар. 2020 г., 05:22:08 | 5 - 9 классы

Определить значение переменной s после выполнения следующих фрагментов программы : Var s ; real ; i : integer ; ?

Определить значение переменной s после выполнения следующих фрагментов программы : Var s ; real ; i : integer ; .

. . s : = 0 ; for i : = 1 to 9 do begin s : = s * 10 ; s : = s + I ; end ;

TasyaSnow 22 дек. 2020 г., 12:59:22 | 5 - 9 классы

Укажите результат выполнения программы var a, b : integer procedure proc(var a : integer ; b : integer) begin b : = 4 ; a : = 6 ; b : = a + b ; end ; begin a : = 2 ; b : = 3 ; proc(a, b) ; writeln(a, ?

Укажите результат выполнения программы var a, b : integer procedure proc(var a : integer ; b : integer) begin b : = 4 ; a : = 6 ; b : = a + b ; end ; begin a : = 2 ; b : = 3 ; proc(a, b) ; writeln(a, ' ', b) ; end.

852741963987 17 сент. 2020 г., 19:17:23 | 10 - 11 классы

Procedure P(x ; var y : integer) ; begin y : = x + 1 end ; procedure Q(x : integer ; var y : integer) ; begin y : = x + 1 end ; procedure R(x, y : integer) ; begin y : = x + 1 end ; Для каждой из проц?

Procedure P(x ; var y : integer) ; begin y : = x + 1 end ; procedure Q(x : integer ; var y : integer) ; begin y : = x + 1 end ; procedure R(x, y : integer) ; begin y : = x + 1 end ; Для каждой из процедур определите, какие из ее параметров являются параметрами - переменными.

В ответ введите суммарное количество параметров - переменных для этих трех процедур.

Пример ввода ответа : 3.

Spasibo123 5 февр. 2020 г., 18:45:06 | 10 - 11 классы

Что напечатает данная программа : Var x : = Integer Begin x : = 2 WriteLn('x + 1 = ', x) End?

Что напечатает данная программа : Var x : = Integer Begin x : = 2 WriteLn('x + 1 = ', x) End.

Дени123654123654 9 мар. 2020 г., 02:48:01 | 5 - 9 классы

Значение переменной p при n = 5 после выполнения программы ProgrammTest ; Var p, i, n : integer ; Begin Write('Введите цельное n = ') Readln(n) ; p : = 1 for i : = 1 to n do p : = p * i ; Writeln(n, '?

Значение переменной p при n = 5 после выполнения программы ProgrammTest ; Var p, i, n : integer ; Begin Write('Введите цельное n = ') Readln(n) ; p : = 1 for i : = 1 to n do p : = p * i ; Writeln(n, ' = ', p) End.