ГИААлгоритмизацияи программирование. 25.03.2012. S:0. K:1. начало.


Чтобы посмотреть презентацию с картинками, оформлением и слайдами, скачайте ее файл и откройте в PowerPoint на своем компьютере.
Текстовое содержимое слайдов презентации:

ГИААлгоритмизацияи программирование25.03.2012 S:=0K:=1началоK<12S:=S+12K:=K+1Sконец { ПАСКАЛЬ }Var s, k: integer;Begin S:=0; for K:=1 to 11 do S:=S + 12; write(S);End. K S 01 122 243 364 48. . . . . .11 13212




Dat[1]:=7; Dat[2]:=9; Dat[3]:=10; Dat[4]:=8; Dat[5]:=6; Dat[6]:=7; Dat[7]:=6; day:=1K:=2началоdayконецm:=Dat[1]K<8m:=Dat[K]; day:=KK:=K+1Dat[K]<mнетда { ПАСКАЛЬ }Var k, m, day: integer;Dat: array [1..7] of integer;Begin Dat[1]:=7; Dat[2]:=9; Dat[3]:=10; Dat[4]:=8; Dat[5]:=6; Dat[6]:=7; Dat[7]:=6; day:=1; m:=Dat[1]; for K:=2 to 7 do begin if Dat[K]<m then begin m:=Dat[K]; day:=K; end; end; write(day);End. Dat[1]Dat[2]Dat[3]Dat[4]Dat[5]Dat[6]Dat[7]DayMK7910867617No2No3No4Yes565No6No78 { ПАСКАЛЬ }Var k, m, day: integer;Begin k:=0; read(x); while(x <> 0) do begin if (x mod 2 = 0) and (x mod 7 = 0) then k := k + 1; read(x); end; write(k);End. Обратить внимание 1. Массив – это область однотипных данных, обозначенная одним именем. Dat: array [1..7] of integer;Массив из 7 элементов;Каждый элемент массива занимает в памяти 2 байта;Адрес элемента K массива Dat вычисляется как адрес Dat+2*(k-1){5C22544A-7EE6-4342-B048-85BDC9FD1C3A}Элемент1234567Байт1234567891011121314Значение79108676 2. Составной оператор.Begin { действия }End if Dat[K]<m then begin m:=Dat[K]; day:=K; end; 3. Оператор цикла со счетчиком.For K:=N to M do Действие ; Оператор будет выполнять действие (тело цикла) M-N+1 раз при условии, что M-N+1 > 0. for K:=1 to 11 do S:=S + 12; Общий видK:=NKMТело циклаK:=K+1нетда

Приложенные файлы

  • pptx 87545365
    Размер файла: 287 kB Загрузок: 0

Добавить комментарий