сервис вопросов и ответовОпределите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k := 1 to 9 do s :=s - 3 write(s); End.
5-9 класс|
|
Jumabekk362
02 сент. 2014 г., 5:30:13 (9 лет назад)
112lol
02 сент. 2014 г., 8:10:24 (9 лет назад)
s = 50
k=1 s=50-3=47
k=2 s=44
k=3 s=41
k=4 s=38
k=5 s=35
k=6 s=32
k=7 s=29
k=9 s=26
Ответ: 26
Conia555
02 сент. 2014 г., 10:01:12 (9 лет назад)
ответ получается 23
ответ 100%, проверял в турбо паскаль
1=47
2=44
3=41
4=38
5=35
6=32
7=29
8=26
9=23
Ответить
Другие вопросы из категории
Помогите!!!
А)Любое словесное высказывание,напечатанное,написанное или существующее в устной форме.5 букв.
Б)Информация,представленная в форме письменного текста.1 слово-9 букв 2 слово-10 букв.
В)Любой текст,созданный с помощью текстового редактора,вместе с включенными в него нетекстовыми материалами.8 букв.
1)дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
Читайте также
Определите, что будет напечатано в результате работы следующей программы:
Var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.
В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] – заданий сделал первый ученик Dat[2] – второй ученик и т.д.).
Определите, что будет напечатано в результате работы следующей программы.Алгоритмический язык
Определить, что будет напечатано в результате работы след программы . Алгоритм яз : Алг Нач цел b , c b := 0
c := 0
нц пока b <> 10
c := c + b
b := b + 1
кц
вывод c
желательно с обьяснением
Определите, что будет напечатано в результате выполнения следующего алгоритма:
Var s,k: integer;
begin
s:= 100
k:=7
repeat
s:= s-k
k:=k+1
Until k>10
writeln( s+k)
end.
Пожалуйста объясните как вывести отсюда результат
Что будет напечатано в результате выполнения следующего фрагмента: var a,b : integer; begin b=0 a=96 while
a<>3 do
begin
a=a div 2
b=b+a
end
write(b)
end.
Вы находитесь на странице вопроса "Определите, что будет напечатано в результате работы следующей программы. Var s, k: integer; Begin s:=50; for k := 1 to 9 do s :=s - 3 write(s); End.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.