Задать вопрос
10 октября, 06:28

Запишите число, которое будет напечатано в результате выполнения

следующей программы. Для Вашего удобства программа представлена на пяти

языках программирования.

var k, s, d: integer;

begin

readln (d) ;

s : = 0;

k : = 0;

while k < 100 do

begin

s : = s + 32;

k : = k + d; end;

write (s) ; end.

+2
Ответы (1)
  1. 10 октября, 09:09
    0
    Смотря чему будет равно d

    цикл будет повторяться пока k меньше 100

    а k увеличивается на число d

    например, если d равно 1 то цикл повторится 100 раз

    соответственно S будет равно 32*100 = 3200
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Определить значение переменной у после выполнения следующих фрагментов программы: a) Var у : real; i : integer; у : = 1; i : = 5; while i> 2 do i: = i - 1; y:=y + 1 * i; b) Var у : real; i : integer; у : = 1; i : = 2; repeat i: = 2 * i;
Ответы (1)
Укажите области видимости в программе: Program P; Var x: integer; Procedure P1; Var y: integer; Begin P2; End; Procedure P2; Var z: integer; Begin {Тело процедуры} End; Procedure P3; Var m: integer; Begin P1; End; Begin {Тело основной программы}P3;
Ответы (1)
Какое число будет напечатано в результате выполнения программы: var i, k: integer; function f (x: integer) : integer; var m: integer; begin if x < 10 then f : = x else begin m : = f (x div 10) ; if m < x mod 10 then f : = x mod 10 else f : = m; end;
Ответы (1)
6) Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin s : = 0; for n:=4 to 13 do begin s : = s + 15; end; write (s) end.
Ответы (1)
1) Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin n : = 3; s : = 0; while n < = 26 do begin s : = s + 6; n : = n + 1 end; write (s) end.
Ответы (2)