Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Свидетельство о публикации

Автоматическая выдача свидетельства о публикации в официальном СМИ сразу после добавления материала на сайт - Бесплатно

Добавить свой материал

За каждый опубликованный материал Вы получите бесплатное свидетельство о публикации от проекта «Инфоурок»

(Свидетельство о регистрации СМИ: Эл №ФС77-60625 от 20.01.2015)

Инфоурок / Информатика / Другие методич. материалы / Самостоятельная работа по Паскаля для 9 класса
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 28 июня.

Подать заявку на курс
  • Информатика

Самостоятельная работа по Паскаля для 9 класса

библиотека
материалов

Самостоятельная работа по программированию (на языке Паскаль)

1 вариант.

  1. Найдите ошибки в программе. Задача: определить кто старше: Маша или Саша?

var s,m,с: integer;

begin

readln (s,m);

then if s=m then write('Саша и Маша ровестники')else write ('Саша старше Маши')

else write ('Маша старше Саши')

end

  1. Найдите значение переменной а после выполнения программы:

var a,b: integer;

begin

a:=1848;

b:=(a div 100)*10+9:

a:=(10*b-a) mod 100;

writeln (‘a=’, a);

writeln (‘b=’, b);

end.

  1. Написать программу, нахождения суммы трехзначного числа, если это число разложить на разряды.

  2. Написать программу, возведения числа в квадрат, если оно положительное, иначе вывести на экран фразу, что число отрицательное.

  3. Произвести обмен переменных:

На входе: A:=50 B:=80 C:=100

На выходе: A:=100 B:=50 C:=80

  1. Написать программу, которая определяет по числу день недели (например, если это 2 день недели- то это вторник, если 7- то это воскресенье)

Самостоятельная работа по программированию (на языке Паскаль)

  1. вариант.

  1. Найдите ошибки в программе. Задача: определить является ли число четным?

var a,m,с: integer;

begin

readln (s,m);

then if a>0 then write('число четное)else write ('число нечетное')


end

  1. Найдите значение переменной а после выполнения программы:

var a,b: integer;

begin

a:=1851;

b:=(a div 100)*10+9:

a:=(10*b-a mod) 100;

writeln (‘a=’, a);

writeln (‘b=’, b);

end.

  1. Написать программу, нахождения среднего значения суммы трехзначного числа, если это число разложить на разряды.

  2. Написать программу, если число кратное трем, то возвести его в квадрат, иначе вывести на экран фразу, что число не кратное трем.

  3. Произвести обмен переменных:

На входе: A:=25 B:=75 C:=105

На выходе: A:=75 B:=105 C:=25

  1. Написать программу, которая определяет по количеству углов какая это геометрическая фигура (например, если это 3 угла - то это треугольник)










Подайте заявку сейчас на любой интересующий Вас курс переподготовки, чтобы получить диплом со скидкой 50% уже осенью 2017 года.


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Краткое описание документа:

Самостоятельная работа по программированию (на  языке Паскаль)

1 вариант.

1.      Найдите  ошибки в программе. Задача:  определить кто старше: Маша или Саша?

 var s,m,с: integer;

begin

readln (s,m);

then if s=m then write('СашаиМашаровестники')else  write ('СашастаршеМаши')

 else  write ('МашастаршеСаши')

  end

2.  Найдите  значение переменной а после выполнения программы:

var a,b: integer;

begin

a:=1848;

b:=(a div 100)*10+9:

a:=(10*b-a) mod 100;

writeln (‘a=’, a);

writeln (‘b=’, b);

end.

3.      Написать программу, нахождения суммы трехзначного числа, если это число разложить на разряды.

4.      Написать программу, возведения числа в квадрат, если оно положительное, иначе вывести на экран фразу, что число отрицательное.

5.      Произвести обмен переменных:

 На входе:  A:=50                           B:=80                   C:=100

На выходе:  A:=100                      B:=50                   C:=80

6.       Написать программу, которая определяет по числу день недели (например, если это 2 день недели- то это вторник, если 7- то это воскресенье)

Самостоятельная работа по программированию (на  языке Паскаль)

2       вариант.

1.      Найдите  ошибки в программе. Задача:  определить является ли число четным?

 var a,m,с: integer;

begin

readln (s,m);

then if a>0 then write('числочетное)else  write ('числонечетное')

 

end

2.  Найдите  значение переменной а после выполнения программы:

var a,b: integer;

begin

a:=1851;

b:=(a div 100)*10+9:

a:=(10*b-a) mod 100;

writeln (‘a=’, a);

writeln (‘b=’, b);

end.

3.      Написать программу, нахождения среднего значения суммы трехзначного числа, если это число разложить на разряды.

4.      Написать программу,  если число кратное трем, то возвести его в квадрат, иначе вывести на экран фразу, что число не кратное трем.

5.      Произвести обмен переменных:

 На входе:  A:=25                           B:=75                   C:=105

На выходе:  A:=75                         B:=105                 C:=25

 

6.       Написать программу, которая определяет по количеству углов какая это геометрическая фигура (например, если это 3 угла - то это треугольник)

Автор
Дата добавления 21.02.2015
Раздел Информатика
Подраздел Другие методич. материалы
Просмотров3657
Номер материала 403059
Получить свидетельство о публикации
Похожие материалы

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх