Составить программу вычисления количества циклов

16.01.2011, 18:27. **Показов** 1279. **Ответов** 1

Студворк — интернет-сервис помощи студентам

3.1.составить программу вычисления количества циклов.
Дано:
z:=2;
d:=7;
k:=0;
Пока d>=x d:=d-z k:=k+1
вывести к и d на экран.
переписать программу 3.1. оператором цикла с пост условием

@MegaAce · 16.01.2011, 18:34

Будь то бы так
Значение k и есть количество циклов

Pascal

z:=2;
d:=7;
k:=0;
while d>=x do
begin
d:=d-z;
k:=k+1;
end;
writeln(k:5,d:5);

Pascal

repeat
begin
d:=d-z;
k:=k+1;
end
until d<x
writeln(k:5,d:5);

Vova4
		1
	Составить программу вычисления количества циклов 16.01.2011, 18:27. Показов 1279. Ответов 1 Метки нет (Все метки) 3.1.составить программу вычисления количества циклов. Дано: z:=2; d:=7; k:=0; Пока d>=x d:=d-z k:=k+1 вывести к и d на экран. переписать программу 3.1. оператором цикла с пост условием

	16.01.2011, 18:34

Опции темы

Составить программу вычисления количества циклов

Решение