сервис вопросов и ответовОпределить , что будет напечатано в результате работы . var b , c : integer ; begin b := 15; c := 0; while b <&
5-9 класс|
|
gt; 3 do
begin
c := c + b ;
b := b - 3
end ;
write (c) ;
end .
Просто отвен не нужен . Нужно решение .
SergeiKusnezov
30 мая 2015 г., 19:20:14 (8 лет назад)
Verunchik98
30 мая 2015 г., 21:10:13 (8 лет назад)
цикл будет выполнятся пока b не будет равно 3 вроде так
с1=0+15=15
b1=15-3=12
c2=15+12=27
b2=12-3=9
c3=27+9=36
b3=9-3=6
c4=36+6=42
b4=6-3=3
всё b=3 следовательно останавливаемся
нам нужно вывести с. Ответ:42
Ответить
Другие вопросы из категории
ВОПРОС №216817 (ТИП: C) Дано трехзначное число. В нем зачеркнули последнюю цифру и приписали ее в начале. Написать программу, которая находит
получаемое число.
Создать массив из 20 чисел случайным образом числом из промежутка от -10 дл 30 вывести элемент массива в строку через 4 позиции
вот что получилось
program e1; var A :array [1..20] of integer ; i:integer; begin for i :=1 to 20 do A[i]:= -10 +random(41); for i :=1 to 20 do write (A[i],'...'); end.Читайте также
Определите, что будет напечатано в результате работы следующей программы:
Var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
n := 0;
s := 512;
while s >=0 do begin
s := s -20;
n := n + 1
end;
write(n)
end
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
n := 1;
s := 0;
while n <= 101 do begin
s := s + 7;
n := n + 1
end;
Определите, что будет напечатано в результате выполнения следующего алгоритма:
Var s,k: integer;
begin
s:= 100
k:=7
repeat
s:= s-k
k:=k+1
Until k>10
writeln( s+k)
end.
Пожалуйста объясните как вывести отсюда результат
Определите, что будет напечатано в результате выполнения программы:
var n, s: integer;
begin
n := 4;
s := 0;
while n <= 13 do
begin
s := s + 15;
n := n + 1
end;
write(s)
end.
Вы находитесь на странице вопроса "Определить , что будет напечатано в результате работы . var b , c : integer ; begin b := 15; c := 0; while b <&", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.