В3. Определите, что будет напечатано в результате работы следующего
фрагмента программы:
Var k, s : integer;
BEGIN
s := 0;
k := 0;
while s begin
s := s+10;
k := k+1;
end;
write(k);
END.
Решение:
В программе использован цикл с предусловием, значит операции из тела цикла будут выполняться, пока условие истинно. Из сказанного следует, что выполнение цикла прекратится при s=1024 или любом большем числе. S каждый раз увеличивается на 10, следовательно ее значение всегда кратно 10. Необходимо определить число кратное 10, следующее после 1024 — это число 1030.
Переменная К считает количество таких чисел. К=1030/10=103.
Ответ: 103
В3. Определите, что будет напечатано в результате работы следующего
фрагмента программы:
var k, s: integer;
begin
s:=0;
k:=1;
while k < 11 do begin
s:=s+k;
k:=k+1;
end;
write(s);
end.
Решение:
Задания 9. Простейший циклический алгоритм, записанный на алгоритмическом языке
Цикл закончится, когда К станет равна 11 (по условию К должна быть строго меньше 11 и при этом ее значение каждый раз увеличивается ровна на 1). Последнее значение К, участвующее в вычислениях будет = 10 (увеличение К производится после выполнения действия s:=s+k).
S является суммой всех значений К. Мы можем найти их сумму, прибавляя последовательно все числа: 1+2+3+4+5+6+7+8+9+10 = 55, а можем воспользоваться формулой нахождения суммы первых n элементов арифметической прогрессии: s=(a1+an)/2*n.
Тогда s=(1+1 0)/2*10=55
Ответ: 55
В3. Определите, что будет напечатано в результате работы следующего
фрагмента программы:
var n, s: integer;
begin
n := 1;
s := 0;
while n s := s + 7;
n := n + 1
end;
write(s)
end.
Решение:
Цикл будет выполнен с последним значением n = 101, т.к. под условие не подходят значения начиная с 102. Переменная n является счетчиком, т.к. определяет, сколько раз будет выполнен цикл (при каждом выполнении тела цикла ее значение увеличивается на 1).
Из сказанного следует, что к начальному значению переменной S (0) семерка будет прибавлена 101 раз. S=0+7*101=707
Ответ: 707
Задания для тренировки:
Определите, что будет напечатано в результате работы следующих фрагментов программ:
| 1. var n, s:integer; begin n := 4; s := 0; while n begin s := s + n; n := n + 1 end; write(s) end. |
2. var n, s: integer; begin n := 0; s := 512; while s >= 0 do begin s := s — 20; n := n + 1 end; write(s) end. |
3. var n, s: integer; begin n := 24; s := 0; while n begin s := s + 20; n := n + 2 end; write(s) end. |
4. var n, s: integer; begin n := 4; s := 15; while s begin s := s + 12; n := n + 2 end; write(n) end. |
Информатика 9 задание ОГЭ
Источник: zainform.blogspot.com
Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k : = 1 to 9 do s : = s — 3 write (s) ; End.
Найдите правильный ответ на вопрос ✅ «Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k : = 1 to 9 do s : = s — 3 . » по предмету Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Новые вопросы по информатике
Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=
Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника.
3. Даны длины катетов прямоугольного треугольника. Найдите периметр треугольника.
Почему при А=1, В=1, С=1 ответ АVВ равно 1?
2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.
Найдите наиболее точное общее имя каждой группе объектов: з) клавиатура, сканер, мышь
Главная » Информатика » Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k : = 1 to 9 do s : = s — 3 write (s) ; End.
Источник: iotvet.com
Решите срочно. дам 40 баллов
1. Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s := 0;
for k := 2 to 12 do
s := s + 11;
writeln (s);
end.
2. Определите, что будет напечатано в результате работы следующей программы.
Var u,i: integer;
Begin
u := 26;
For i := 1 to 5 do
u := u – i;
Writeln(u);
End.
3.. Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s := 0 ;
for k:= 4 to 11 do
s := s + k ;
writeln (s);
end.
4. Определите, что будет напечатано в результате работы следующей программы.
var s, n: integer;
begin
s := 1;
for n := 3 to 8 do
s := s * 2;
write(s);
end.
5. Определите, что будет напечатано в результате работы следующей программы.
Var у,і: integer;
Begin
У := 0;
For і := 1 to 3 do
у := у + 4*і;
Writeln(у);
End.
6. Определите, что будет напечатано в результате работы следующей программы.
Var s,і:integer;
Begin
s := 3;
For і := 2 to 5 do
s := s + 2* і;
Writeln (s) ;
End.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.
Источник: dvoechka.com