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

Информатика | 5 - 9 классы

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.

Ответить на вопрос
Ответы (1)
Янчик987 25 дек. 2020 г., 12:19:13

1) Ошибка "Нельзя преобразовать тип real к integer"

При исправлении

var a, b : real ;

begin a : = 26 mod 11 ; b : = 3 ; b : = 6 + a * b ; a : = b / 3 * a ; writeln(a) ;

end.

Выдает 24

2) 52.

174987654321 2 дек. 2020 г., 15:46:27 | 5 - 9 классы

Var k, s : integer ; begin s : = 0 ; k : = 1 ; while k < ; 11 do begin s : = s + k ; k : = k + 1 ; end ; write(s) ; end?

Var k, s : integer ; begin s : = 0 ; k : = 1 ; while k < ; 11 do begin s : = s + k ; k : = k + 1 ; end ; write(s) ; end.

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

Maho123 7 мар. 2020 г., 15:37:03 | 5 - 9 классы

Определите, что будет напечатано в результате работы следующего фрагмента программы : var k, s : integer ; begin s : = 3 ; k : = 1 ; while k < ; 25 do begin s : = s + k ; k : = k + 2 ; end ; write(s?

Определите, что будет напечатано в результате работы следующего фрагмента программы : var k, s : integer ; begin s : = 3 ; k : = 1 ; while k < ; 25 do begin s : = s + k ; k : = k + 2 ; end ; write(s) ; end.

Mylife 25 февр. 2020 г., 16:44:30 | 10 - 11 классы

Определите, что будет напечатано в результате работы следующего фрагмента программы : var k, s : integer ; begin s : = 0 ; k : = 1 ; while k < ; 11 do begin s : = s + k ; k : = k + 1 ; end ; write(s?

Определите, что будет напечатано в результате работы следующего фрагмента программы : var k, s : integer ; begin s : = 0 ; k : = 1 ; while k < ; 11 do begin s : = s + k ; k : = k + 1 ; end ; write(s) ; end.

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

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

Найдите значение переменной А после выполнения программы VAR A : INTEGER BEGIN A : = SQRT(16) : 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.

Малика0405 23 июл. 2020 г., 09:55:55 | 5 - 9 классы

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

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

Var s, k : integer ; Begin s : = 110 ; for k : = 5 to 12 do s : = s - 5write(s) ; End.

AnettaG21 29 мая 2020 г., 04:53:33 | 5 - 9 классы

Определите, что будет напечатано в результате работы следующего фрагмента программы : Var k, s : integer ; begin s : = 0 ; k : = 0 ; while k< ; 30 do begin k : = k + 3 ; s : = s + k ; end ; write(s)?

Определите, что будет напечатано в результате работы следующего фрагмента программы : Var k, s : integer ; begin s : = 0 ; k : = 0 ; while k< ; 30 do begin k : = k + 3 ; s : = s + k ; end ; write(s) ; end.

Baenbaeb67 27 июл. 2020 г., 19:11:38 | 5 - 9 классы

Определите, что будет напечатано в результате работы следующей программы : Var s, k integer ; Begin s : = 0 ; for k : = 2 to 9 do s : = s + 2 * k write(s) ; End?

Определите, что будет напечатано в результате работы следующей программы : Var s, k integer ; Begin s : = 0 ; for k : = 2 to 9 do s : = s + 2 * k write(s) ; End.

Bk25 19 окт. 2020 г., 06:46:31 | 5 - 9 классы

Определить s : 1) Var s, k : integer ; Begin s : = 0 ; for k : = 14 to 18 do s : = s + 7 ; writeln(s) ; End?

Определить s : 1) Var s, k : integer ; Begin s : = 0 ; for k : = 14 to 18 do s : = s + 7 ; writeln(s) ; End.

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

3) var s, k : integer ; begin s : = 100 ; for k : = 0 to 10 do s : = s - 5 ; writeln (s) ; 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.

На странице вопроса 4. Определите результат работы программ :1)var а, b : integer ;begina : = 26 mod 11 ;b : = 3 ;b : = 6 + a * b ;a : = b / 3 * a ;writeln(а) ;end? из категории Информатика вы найдете ответ для уровня учащихся 5 - 9 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.