Наслаждайтесь радостью окончания учебного года весь следующий! Доступ к материалами на весь год со скидкой 90%

СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Выбрать материалы

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Была в сети 01.12.2022 09:50

Клюшникова Юлия Валерьевна

преподаватель информатики, высшей категории

53 года

23 474

930

Подписчики

Подписки

Местоположение

Россия, Омск

Специализация

Информатика

Математика

Обо мне Блог Файлы Тесты Галерея Активность Награды

7_Практическая работа "Цикл WHILE" 9 класс_Босова

Категория: Информатика

16.05.2017 06:39

9 вариантов практической работы по 5 заданий.

Просмотр содержимого документа
«7_Практическая работа "Цикл WHILE" 9 класс_Босова»

ФИО _____________________________________ КЛАСС_________

Вариант 1

1. Определите результат работы программы:

var i:integer;

begin

i:=10;

while i=1 do

begin

write(i,' ');

i:=i-2;

end;

end.

Ответ:________________

2. Определите результат работы программы при а=125:

var a,s:integer;

begin

read(a);

s :=1;

while a0 do

begin

s := s*a mod 10;

a := a div 10;

end;

write(s);

end.

a	s
125	1

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

25 21 17 13 9 5

4. Напишите программу нахождения суммы чисел:

(-8)² (-2)² 4² 10² 16² 22²

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 30. Найти сумму нечетных чисел, кратных 5.

ФИО _____________________________________ КЛАСС_________

Вариант 2

1. Определите результат работы программы:

var i,s:integer;

begin

i:=1; s:=1;

while i5 do

begin

s:=s*i;

i:=i+1;

end;

writeln(s);

end.

i	s
1	1

Ответ:________________

2. Определите результат работы программы при x=214:

var x,s:integer;

begin

read(x);

s :=0;

while x0 do

begin

s := s+x mod 10;

х := x div 10;

end;

write(s);

end.

x	s
214	0

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

0 1 4 9 16 25

4. Напишите программу нахождения суммы чисел:

1/(-2) 1/(-3) 1/(-4) 1/(-5) 1/(-6)

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 30. Найти сумму квадратов четных чисел.

ФИО _____________________________________ КЛАСС_________

Вариант 3

1. Определите результат работы программы:

var i:integer;

begin

i:=1;

while i32 do

begin

write(i,' ');

i:=i*2;

end;

end.

Ответ:________________

2. Определите результат работы программы при y=1234:

var y,s:integer;

begin

read(y);

s :=0;

while y0 do

begin

s := s+1;

y := y div 10;

end;

write(s);

end.

y	s
1234	0

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

1 9 25 49 81 121

4. Напишите программу нахождения суммы чисел:

(-8)² (-6)² (-4)² (-2)² 0² 2²

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 60. Найти сумму чисел, кратных 3 и оканчивающихся на 4.

ФИО _____________________________________ КЛАСС_________

Вариант 4

1. Определите результат работы программы:

var i:integer;

begin

i:=8;

while i=1 do

begin

i:=i-2;

write(i,' ');

end;

end.

Ответ:________________

2. Определите результат работы программы при а=204:

var a,s:integer;

begin

read(a);

s :=1;

while a0 do

begin

a := a div 10;

s := s * a mod 10;

end;

write(s);

end.

a	s
204	1

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

5 9 13 17 21 25

4. Напишите программу нахождения суммы чисел:

8² 2² (-4)² (-10)² (-16)² (-22)²

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 30. Найти сумму четных чисел, кратных 3.

ФИО _____________________________________ КЛАСС_________

Вариант 5

1. Определите результат работы программы:

var i,s:integer;

begin

i:=2; s:=0;

while i7 do

begin

s:=s+i;

i:=i+2;

end;

writeln(s);

end.

i	s
2	0

Ответ:________________

2. Определите результат работы программы при x=159:

var x,s:integer;

begin

read(x);

s :=0;

while x0 do

begin

s := s+x mod 10;

х := x div 10;

end;

write(s);

end.

x	s
159	0

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

25 16 9 4 1 0

4. Напишите программу нахождения суммы чисел:

1/2 1/3 1/4 1/5 1/6

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 30. Найти сумму квадратов нечётных чисел.

ФИО _____________________________________ КЛАСС_________

Вариант 6

1. Определите результат работы программы:

var i:integer;

begin

i:=1;

while i41 do

begin

i:=i*2;

write(i,' ');

end;

end.

Ответ:________________

2. Определите результат работы программы при y=8734:

var y,s:integer;

begin

read(y);

s :=0;

while y0 do

begin

s := s+1;

y := y div 10;

end;

write(s);

end.

y	s
8734	0

Ответ:____

Что находит программа? __________________________________________________

3. Напишите программу вывода последовательности чисел:

144 100 64 36 16 4

4. Напишите программу нахождения суммы чисел:

2² 4² 6² 8² 10² 12²

5. Напишите программу:

Дана последовательность натуральных чисел от 1 до 50. Найти сумму чисел, кратных 4 и оканчивающихся на 0.

Ответы

Вариант	№1	№2
1	10 8 6 4 2	0
2	120	7 Сумма цифр
3	1 2 4 8 16 32	4 Количество цифр
4	6 4 2 0	0
5	12	15 Сумма цифр
6	2 4 8 16 32 64	4 Количество цифр в числе

-80%

Курсы повышения квалификации

Специфика преподавания дисциплины «Информационные технологии» в условиях реализации ФГОС СПО по ТОП-50

Продолжительность 72 часа

4000 руб.

800 руб.

Электронная тетрадь по информатике 5...

Информатика 8 класс ФГОС

Информатика 7 класс ФГОС

Информатика 4 класс ФГОС

Электронная тетрадь по информатике 8...

Информатика 10 класс ФГОС

Электронная тетрадь по информатике 7...

Информатика 8 класс

Скачать

7_Практическая работа "Цикл WHILE" 9 класс_Босова

Просмотр содержимого документа
«7_Практическая работа "Цикл WHILE" 9 класс_Босова»

Рекомендуем курсы ПК и ППК для учителей

Вебинар для учителей

Полезное для учителя

7_Практическая работа "Цикл WHILE" 9 класс_Босова

Просмотр содержимого документа «7_Практическая работа "Цикл WHILE" 9 класс_Босова»

Рекомендуем курсы ПК и ППК для учителей

Вебинар для учителей

Полезное для учителя

Просмотр содержимого документа
«7_Практическая работа "Цикл WHILE" 9 класс_Босова»