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

Adcs 14 февр. 2020 г., 18:57:53

Будет выведено сообщение об ошибке при компиляции программы, потому что не описана переменная i.

А если вместо ненужных m, n, p указать i, то вывод будет следующим :

7 * 1 = 7

7 * 2 = 14

7 * 3 = 21

7 * 4 = 28

7 * 5 = 35

7 * 6 = 42

7 * 7 = 49

7 * 8 = 56

7 * 9 = 63

7 * 10 = 70.

Daryaprotasova2015 11 нояб. 2020 г., 07:14:22 | 5 - 9 классы

Напишите, что и в какой последовательности будет выведено на экран в результате выполнения следующей программы (в точности нарисуйте, как это будет выглядеть на экране) : Var a : integer ; b : real ; ?

Напишите, что и в какой последовательности будет выведено на экран в результате выполнения следующей программы (в точности нарисуйте, как это будет выглядеть на экране) : Var a : integer ; b : real ; begin a : = 2 ; writeln(a) ; b : = a * a + 3 * a ; write(′при а = ′, a, ′, Ответ ′, b) ; write(′ End′) ; end.

Ромtyyf 28 авг. 2020 г., 18:41:10 | 10 - 11 классы

Что будет выведено на экран после выполнения фраг ента программы : for : 1to4 do writeln(i * i) ?

Что будет выведено на экран после выполнения фраг ента программы : for : 1to4 do writeln(i * i) ;

Йчуметнлщдшщгапм5689 22 авг. 2020 г., 00:02:41 | 5 - 9 классы

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

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

N1s 22 июн. 2020 г., 23:52:49 | 5 - 9 классы

Что будет выведено на экран в результате выполнения следующей программы : Program z1 ; Begin Writeln ('Привет, это я, умный компьютер') ; Writeln ('Я знаю, что 6 * 5 = ', 6 * 5) ; End?

Что будет выведено на экран в результате выполнения следующей программы : Program z1 ; Begin Writeln ('Привет, это я, умный компьютер') ; Writeln ('Я знаю, что 6 * 5 = ', 6 * 5) ; 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.

Banannn1 8 апр. 2020 г., 05:35:38 | 5 - 9 классы

Помогите пожалуйста?

Помогите пожалуйста.

Запишите число, которое будет напечатано в результате выполнения программы : var s, n : integer ; begin s : = 33 ; n : = 1 ; while s> ; 0 do begin s : = s - 7 ; n : = n * 3 end ; writeln(n) end.

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.

Karme1698764 13 сент. 2020 г., 15:10:24 | 5 - 9 классы

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

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

Var s, і : integer ;

Begin s : = 3 ; For і : = 2 to 5 do s : = s + 2 * і ; Writeln (s) ;

End.

Рассказ7 13 дек. 2020 г., 12:01:25 | 5 - 9 классы

№3. Какое число выведет на экран ПК после выполнения фрагмента программы?

№3. Какое число выведет на экран ПК после выполнения фрагмента программы?

For i : = 5 downto 1 do s : = 20 - i ;

write (s) ;

№4.

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

Var k, і : integer ; Begin k : = 2 ; For і : = 0 to 2 do k : = 3 * k + і ; Writeln(k) ;

End.

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

Var k, і : integer ;

Begin k : = 4 ; For і : = 1 to 3 do k : = 2 * k + і ; Writeln(k) ;

End.

Vikalove07012000 25 дек. 2020 г., 12:19:12 | 5 - 9 классы

4. Определите результат работы программ :1)var а, b : integer ;begina : = 26 mod 11 ;b : = 3 ;b : = 6 + a * b ;a : = b / 3 * a ;writeln(а) ;end?

4. Определите результат работы программ :

1)

var а, b : integer ;

begin

a : = 26 mod 11 ;

b : = 3 ;

b : = 6 + a * b ;

a : = b / 3 * a ;

writeln(а) ;

end.

2)

var s, k : integer ;

begin

s : = 0 ;

for k : = 12 to 15 do s : = s + 13 ;

writeln(s) ;

end.