Цель: Показать сходство и различие цикла с параметром в языках программирования QBasic и Turbo Pascal 7.0.

Презентация:



Advertisements
Похожие презентации
Цель : Показать сходство и различие условного оператора в языках программирования QBasic и Turbo Pascal 7.0.
Advertisements

Цель урока: Показать сходство и различие операторов цикла с предусловием и постусловием в языках программирования QBasic и Turbo Pascal 7.0. План урока:
1 Программирование на языке Паскаль Тема 4. Циклы.
Операторы цикла © М.Е.Макарова. Цикл - это команда исполнителю повторить заданное количество раз, указанную последовательность команд В языке программирования.
Операторы цикла © М.Е.Макарова
Цель : Показать сходство и различие вложенных циклов в языках программирования QBasic и Turbo Pascal 7.0.
Цикл с параметрами. Операторы цикла в Паскале Операторы цикла используются для многократного повторения входящих в их состав операторов. В языке Турбо.
Организация повторений в Паскале. i,1,n Действие 1 Действие 2 i,1,n Действие 1 Действие 2 FOR i:=1 TO N DO BEGIN действие 1; действие 2; END; FOR i:=1.
АЛГОРИТМИЧЕСКАЯ СТРУКТУРА ЦИКЛ АЛГОРИТМИЧЕСКАЯ СТРУКТУРА ЦИКЛ В TURBO PASCAL Условие Оператор ДаНет Учитель информатики: Коваленко Татьяна Викторовна
Организация повторений в Паскале. Найди ошибки: Program new Uses crt; Var a, b, c integer Begin clrscr Readln(a,b); C:=a*a+b*b Wreteln(c); End.
Учитель информатики "СОШ 6" г. Кирова Захарова Е.В. ЦИКЛЫ В ПАСКАЛЕ.
Операторы циклаОператоры циклаЦиклы позволяют многократно выполнять одну или группу команд, причем в тексте программы нет необходимости записывать эти.
Циклический алгоритм –это алгоритм команды которого выполняются несколько раз подряд. В языке Паскаль имеется три различных оператора цикла: 1. Оператор.
Алгоритмическая структура цикл Алгоритм циклической структуры - это алгоритм, в котором происходит многократное повторение одного и того же участка программы.
1 Программирование на языке Паскаль 1. Циклы с параметром.
Оператор цикла с предусловием. Оператор цикла с предусловием используется в тех случаях, когда заранее неизвестно число повторений цикла. Форма записи.
Программирование на языке Паскаль. 3 Циклы Цикл – это многократное выполнение одинаковой последовательности действий. цикл с известным числом шагов цикл.
ЦИКЛ «ДО» i:=1,n действия … FOR i:=1 TO n DO Begin Действия End; …
Операторы цикла. n := 10; For i := 1 to n do Begin Write (i); n := 100; End; Тело цикла будет выполняться 10 раз, хотя уже после первого выполнения тела.
1 Тема 4. Циклы на языке Паскаль.
Транксрипт:

Цель: Показать сходство и различие цикла с параметром в языках программирования QBasic и Turbo Pascal 7.0.

Проверка задания 1. Имеется условный оператор: if D10 Then writeln('ypa!') Else Writeln(' плохо...'); Можно ли заменить его следующими операторами: if D=10 Then Writeln('ypa!') Else Writeln('nлoxo...'); (НЕТ) if Not(D=W) Then Writeln('ypa!') Else Writeln('nлoxo...'); (Да, если W=10 ) if Not(D=10) Then Writeln('плоxo...') Else Writeln('ypa!'); (НЕТ) if Not(D10) Then Writeln('nлoxo...') Else Writeln('ypa!'). (ДА)

2. Какими будут значения переменных j, k после выполнения условного оператора: QBasic Turbo Pascal 7.0 if j>k Then j = k-2 Else k=k-2 if j>k Then j:=k - 2 Else dec(k,2); если исходные значения переменных равны: j=3, k=5;Ответы:(j=3, к=3) j=3, k=3;(j=3, к=1) j=3, k=2.(j=0, k=2)

Цикл с параметром FOR I=A TO B [STEP h] For :=А То В Do Если h=1, то шаг можно опустить. Оператор цикла с параметром применяют тогда, когда известно число повторений одного и того же действия. Начальное и конечное значения параметра цикла могут быть представлены константами, переменными или арифметическими выражениями.

Рассмотрим, как выполняется оператор цикла с параметром вида FOR I=A TO B, For :=А То В Do Сначала вычисляются значения выражений А и В. Если А последовательно принимает значения, равные А, А+1,..., В-1, В, и для каждого из этих значений выполняется. Если А>В, то не будет выполнен ни разу и выполнение цикла с параметром сразу же закончится. Оператор цикла с параметром FOR I=B TO A STEP -1 и For :=А DownTo В Do выполняется аналогичным образом, но значение изменяется с шагом, равным -1. Цикл с параметром

Составить программу вычисления значения выражения y=1+1/2+1/3+… +1/20. В данном случае целесообразно организовать цикл с параметром, изменяющимся от 1 до 20, то есть шаг изменения параметра равен +1. Обозначим: у очередное значение суммы дробей; n параметр цикла. Учитывая это, составим программу: prim1Program prim1; uses crt; DEFINT N Var n: Integer; DEFSGN Y y: real; Begin CLS clrscr; Задаем начальное значение равное нулю. Y=0 y:=0; QB TP

Организовываем цикл с параметром от 1 до 20 FOR n=1 TO 20 For n:=1 to 20 Do begin Находим очередную сумму. Y=Y +1/N y:=y + 1/n; Выводим на экран очередную сумму. ?Y=;Y Writeln('y=',y); NEXT End.; End end. Самостоятельное задание. А) Переставьте строки вывода результата за NEXT (End;) Б) Измените цикл с 20 до 1.

Из чисел от 10 до 99 вывести те, сумма цифр которых равна S(0

PRIM2Program prim2; uses crt; DEFINT K,N,P,SCLSVar k,n,pl,p2,s:Integer; Begin CLS clrscr; Задаем целое число от 10 до 99. INPUTцелое число=;N Writeln(' целое число n='); Readln(n); Организовываем цикл с параметром FOR K=10 TO 99 For k:=10 To 99 Do Begin Выделяем первую цифру. P1=K \10 P1:=k Div 10; Выделяем вторую цифру.P2=K MOD 10 p2:=k Mod 10; Находим сумму цифр S=P1+ P2 s:=p1+p2; Если сумма цифр равна заданному числу N, то выводим К IF S=N THEN PRINT k=;K if s=n Then Writeln(k=,k); NEXT End; END End.

Дано натуральное число n (1000

PRIM3 Program Prim3 uses crt; DEFINT A,I, M-N Var n, m, a, i: Integer; Begin CLS Clrscr; Введем четырехзначное целое число INPUTN

Задание 1. Определить значение переменной S после выполнения следующих операторов: s=0:n=5 For i=2 То n: s=s+100 \ i :next s:=0; n:=5 For i:=2 То n Do s:=s+100 Div i 2. Какие из приведенных операторов правильные и почему? А) FOR I=12 TO 15:S+S+I:NEXT For i:=12 To 15 Do s:=s+i; Б) FOR A=30 TO 20 For a:=30 To 20 Do if А Mod 3=0 Then d=d+1 if a Mod 3=0 Then d:=d+1; NEXT 3. Как выглядит оператор цикла с параметром? Как он работает?