Цикл со счетчиком
Ц ИКЛ СО СЧЕТЧИКОМ FOR управляющая переменная:= a TO n DO операторы;(если an) Здесь a – начальное значение управляющей переменной; n – конечное значение управляющей переменной;
П РИМЕР : Вывести на экран числа от 79 до 99 program vivesti_chisla; var i: integer; begin for i:=79 to 99 do writeln (i); readln(i) end.
div – деление нацело mod – остаток от деления 11 div 4 = 2 11 mod 4 = 3 7 div 3 = 2 7 mod 3 = 1 26 div 5 = 5 26 mod 5 = 1
Задачи 1. Вывести на экран: числа от 1 до 9; числа от 35 до 67 в обратном порядке; буквы от m до w. 2. Подсчитать количество элементов кратных 3 в диапазоне чисел от 1 до Подсчитать сумму 10 чисел, введенных с клавиатуры.
Подсчитать количество элементов, которые при делении на 8 дают остаток 5 в диапазоне от 67 до 112. ( разобрать программу - переписать ее в тетрадь и напротив каждой строчки записать, что она значит; ввести программу в Turbo Pascal ) program ostatok; var n,k: integer; begin k:=0; for n:=67 to 112 do begin if n mod 8 = 5 then k:=k+1; end; writeln(k); readln(k) end.