Вопрос 20_2. Короткий алгоритм в среде формального исполнителя или на языке программирования

Вариант № 3989859

Задание 9 № 209

Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 0 нц для k от 9 до 13 s:= s + 9 кц вывод s кон	DIM k, s AS INTEGER s = 0 FOR к = 9 TO 13 s = s + 9 NEXT k PRINT s	Vars,k: integer; Begin s:= 0; for k:= 9 to 13 do s:= s + 9; writeln(s); End.

Задание 9 № 490

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

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 2 нц для k от 1 до 5 s:= s*2 кц вывод s кон	s = 2 FOR k = 1 TO 5 s = s*2 NEXT k PRINT s END	Var s, k: integer; Begin s:= 2; for k:= 1 to 5 do s:= s*2; write (s); End.

Задание 9 № 1020

Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел u,i u:= 30 нц для i от 1 до 6 u:= u – i кц вывод u кон	DIM i,u AS INTEGER u = 30 FOR i = 1 TO 6 u = u – i NEXT i PRINT u	Varu,i: integer; Begin u:= 30; For i:= 1 to 6 do u:= u – i; Writeln(u); End.

Задание 9 № 650

Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, n s:= 5 нц для n от 2 до 4 s:= s + (n-1) кц вывод s кон	DNM n, s AS INTEGER s = 5 FOR n = 2 TO 4 s = s + (n-1) NEXT n PRINT s	Var s, n: integer; Begin s:= 5; For n:= 2 to 4 do s:= s + (n-1); Writeln(s); End.

Задание 9 № 847

Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел n, s s:= 1 нц для n от 2 до 5 s:= s * 3 кц вывод s кон	DIM n, s AS INTEGER s = 1 FOR n = 2 TO 5 s = s * 3 NEXT n PRINT s END	var n, s: integer; begin s:= 1; for n:= 2 to 5 do s:= s * 3; write(s); end.

Задание 9 № 169

Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 0 нц для k от 7 до 11 s:= s + 11 кц вывод s кон	DIM k, s AS INTEGER s = 0 FOR к = 7 TO 11 s = s + 11 NEXT k PRINT s	Vars,k: integer; Begin s:= 0; for k:= 7 to 11 do s:= s + 11; writeln(s); End.

Задание 9 № 550

Запишите зна­че­ние переменной y, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел y, i y:= 0 нц для i от 1 до 3 y:= y + 4*i кц вывод y кон	DIM i, y AS INTEGER y = 0 FOR i = 1 TO 3 y = y + 4*i NEXT i PRINT y	Vary,i: integer; Begin y:= 0; For i:= 1 to 3 do y:= y + 4*i; Writeln(y); End.

Задание 9 № 69

Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 0 нц для k от 3 до 8 s:= s + 9 кц вывод s кон	DIM k, s AS INTEGER s = 0 FOR к = 3 TO 8 s = s + 9 NEXT k PRINT s	Vars,k: integer; Begin s:= 0; for k:= 3 to 8 do s:= s + 9; writeln(s); End.

Задание 9 № 350

Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 50 нц для k от 0 до 8 s:= s - 4 кц вывод s кон	DIM k, s AS INTEGER s = 50 FOR к = 0 TO 8 s = s - 4 NEXT k PRINT s END	Vars,k: integer; Begin s:= 50; for k:= 0 to 8 do s:= s - 4; writeln(s); End.

Задание 9 № 370

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

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 50 нц для k от 1 до 9 s:= s - 3 кц вывод s кон	s = 50 FOR к = 1 TO 9 s = s - 3 NEXT k PRINT s END	Var s, k: integer; Begin s:= 50; for k:= 1 to 9 do s:= s - 3; write (s); End.

Задание 9 № 710

Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 0 нц для k от 6 до 12 s:= s + 10 кц вывод s кон	DIM k, s AS INTEGER s = 0 FOR к = 6 TO 12 s = s + 10 NEXT k PRINT s	Vars,k: integer; Begin s:= 0; for k:= 6 to 12 do s:= s + 10; writeln(s); End.

Задание 9 № 1163

Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 0 нц для k от 14 до 18 s:= s+7 кц вывод s кон	DIM k, s AS INTEGER s = 0 FOR k = 14 TO 18 s = s+7 NEXT k PRINT s	Vars,k: integer; Begin s:= 0; for k:= 14 to 18 do s:= s+7; writeln(s); End.

Задание 9 № 390

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

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 100 нц для k от 1 до 9 s:= s - 5 кц вывод s кон	DIM k, s AS INTEGER s = 100 FOR k = 1 TO 9 s = s - 5 NEXT k PRINT s END	Var s, k: integer; Begin s:= 100; for k:= 1 to 9 do s:= s - 5; write (s); End.

Задание 9 № 470

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

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 1 нц для k от 3 до 0 шаг −1 s:= s*3 кц вывод s кон	s = 1 FOR k = 3 TO 0 STEP −1 s = s*3 NEXT k PRINT s END	Var s, k: integer; Begin s:= 1; for k:= 3 downto 0 do s:= s*3; write (s); End.

Задание 9 № 410

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

 

Алгоритмический язык	Бейсик	Паскаль
алг нач цел s, k s:= 3 нц для k от 0 до 9 s:= s + 3 кц вывод s кон	s = 3 FOR к = 0 TO 9 s = s + 3 NEXT k PRINT s END	Var s, k: integer; Begin s:= 3; for k:= 0 to 9 do s:= s + 3; write (s); End.

 

Вопрос 20_2. Короткий алгоритм в среде формального исполнителя или на языке программирования

1. Задание 20 № 260 20.2 Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет ко­ли­че­ство чисел, окан­чи­ва­ю­щих­ся на 6. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, окан­чи­ва­ю­ще­е­ся на 6. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число — ко­ли­че­ство чисел, окан­чи­ва­ю­щих­ся на 6.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
3 16 26 24	2

2. Задание 20 № 300 20.2 Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет сумму чисел, крат­ных 5. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 5. Ко­ли­че­ство чисел не пре­вы­ша­ет 100. Введённые числа не пре­вы­ша­ют 300. Про­грам­ма долж­на вы­ве­сти одно число — сумму чисел, кратных 5.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
3 15 25 6	40

3. Задание 20 № 441 20.2 Напишите про­грам­му для ре­ше­ния сле­ду­ю­щей задачи. Ка­ме­ра на­блю­де­ния ре­ги­стри­ру­ет в ав­то­ма­ти­че­ском ре­жи­ме ско­рость про­ез­жа­ю­щих мимо неё автомобилей, округ­ляя зна­че­ния ско­ро­сти до целых чисел. Не­об­хо­ди­мо определить:

1) разность мак­си­маль­ной и ми­ни­маль­ной ско­ро­стей автомобилей;

2) количество автомобилей, ско­рость ко­то­рых не пре­вы­ша­ла 30 км/ч.

 

Программа по­лу­ча­ет на вход число про­ехав­ших ав­то­мо­би­лей N (1 ≤ N ≤ 30), затем ука­зы­ва­ют­ся их скорости. Зна­че­ние ско­ро­сти не может быть мень­ше 1 и боль­ше 300. Про­грам­ма долж­на сна­ча­ла вы­ве­сти раз­ность мак­си­маль­ной и ми­ни­маль­ной ско­ро­стей автомобилей, затем ко­ли­че­ство автомобилей, ско­рость ко­то­рых не пре­вы­ша­ла 30 км/ч.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
4 74 69 63 96	33 0

4. Задание 20 № 661 20.2 Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти натуральных чисел опре­де­ля­ет сумму всех чисел, крат­ных 3 и окан­чи­ва­ю­щих­ся на 4. Про­грам­ма получает на вход на­ту­раль­ные числа, ко­ли­че­ство введённых чисел неизвестно, по­сле­до­ва­тель­ность чисел за­кан­чи­ва­ет­ся числом 0 (0 — при­знак окончания ввода, не вхо­дит в последовательность). Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30000. Про­грам­ма должна вы­ве­сти одно число: сумму всех на­ту­раль­ных чисел, крат­ных 3 и окан­чи­ва­ю­щих­ся на 4.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
16 24 56 22 54 0	78

5. Задание 20 № 381 20.2 Напишите про­грам­му для ре­ше­ния сле­ду­ю­щей задачи. Ка­ме­ра на­блю­де­ния ре­ги­стри­ру­ет в ав­то­ма­ти­че­ском ре­жи­ме ско­рость про­ез­жа­ю­щих мимо неё автомобилей, округ­ляя зна­че­ния ско­ро­сти до целых чисел. Не­об­хо­ди­мо опре­де­лить ми­ни­маль­ную за­ре­ги­стри­ро­ван­ную ско­рость автомобиля. Если ско­рость хотя бы од­но­го ав­то­мо­би­ля была боль­ше 80 км/ч, вы­ве­ди­те «YES», иначе вы­ве­ди­те «NO».

Программа по­лу­ча­ет на вход число про­ехав­ших ав­то­мо­би­лей N (1 ≤ N ≤ 30), затем ука­зы­ва­ют­ся их скорости. Зна­че­ние ско­ро­сти не может быть мень­ше 1 и боль­ше 300.Программа долж­на сна­ча­ла вы­ве­сти ми­ни­маль­ную скорость, затем YES или NO.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
4 74 69 63 96	63 YES

6. Задание 20 № 1253 20.2 На­пи­ши­те программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел на­хо­дит сред­нее ариф­ме­ти­че­ское чисел, крат­ных 8, или сообщает, что таких чисел нет (выводит «NO»). Про­грам­ма по­лу­ча­ет на вход на­ту­раль­ные числа, ко­ли­че­ство введённых чисел неизвестно,последовательность чисел за­кан­чи­ва­ет­ся чис­лом 0 (0 – при­знак окон­ча­ния ввода, не вхо­дит в последовательность).

Количество чисел не пре­вы­ша­ет 100. Введённые числа не пре­вы­ша­ют 300. Про­грам­ма долж­на вы­ве­сти сред­нее ариф­ме­ти­че­ское чисел, крат­ных 8, или вы­ве­сти «NO», если таких чисел нет. Зна­че­ние вы­во­дить с точ­но­стью до десятых.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
8 122 64 16 0	29,3
111 1 0	NO

7. Задание 20 № 1273 20.2 На­пи­ши­те программу, ко­то­рая в по­сле­до­ва­тель­но­сти натуральных чисел вы­чис­ля­ет сумму всех дву­знач­ных чисел, крат­ных 8. Про­грам­ма получает на вход на­ту­раль­ные числа, ко­ли­че­ство введённых чисел неизвестно, по­сле­до­ва­тель­ность чисел за­кан­чи­ва­ет­ся числом 0 (0 – при­знак окончания ввода, не вхо­дит в последовательность). Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000.

Программа долж­на вывести одно число: сумму всех дву­знач­ных чисел, крат­ных 8.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
17 16 32 160 0	48

8. Задание 20 № 160 20.2 Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет сумму чисел, окан­чи­ва­ю­щих­ся на 4. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, окан­чи­ва­ю­ще­е­ся на 4. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число — сумму чисел, окан­чи­ва­ю­щих­ся на 4.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
3 14 25 24	38

9. Задание 20 № 421 20.2 Напишите про­грам­му для ре­ше­ния сле­ду­ю­щей задачи. Ка­ме­ра на­блю­де­ния ре­ги­стри­ру­ет в ав­то­ма­ти­че­ском ре­жи­ме ско­рость про­ез­жа­ю­щих мимо неё автомобилей, округ­ляя зна­че­ния ско­ро­сти до целых чисел. Не­об­хо­ди­мо опре­де­лить сред­нюю за­ре­ги­стри­ро­ван­ную ско­рость всех автомобилей. Если не менее двух ав­то­мо­би­лей дви­га­лись со ско­ро­стью не боль­ше 40 км/ч, вы­ве­ди­те «YES», иначе вы­ве­ди­те «NO».

Программа по­лу­ча­ет на вход число про­ехав­ших ав­то­мо­би­лей N (1 ≤ N ≤ 30), затем ука­зы­ва­ют­ся их скорости. Зна­че­ние ско­ро­сти не может быть мень­ше 1 и боль­ше 300.Программа долж­на сна­ча­ла вы­ве­сти сред­нюю скорость, затем «YES» или «NO».

Пример ра­бо­ты программы:

Входные данные	Выходные данные
4 74 69 63 96	63 NO

10. Задание 20 № 60 20.2 Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет ко­ли­че­ство чисел, крат­ных 4. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 4. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число — количество чисел, крат­ных 4.

Пример ра­бо­ты программы:

Входные данные	Выходные данные
3 16 26 24	2