Что такое безумовний цикл?

Знания

Информатика

1 ответ:

Юрий Владиславович2 года назад

0 0

Цикл — різновид керівної конструкції у високорівневих мовах програмування, призначена для організації багаторазового виконання набору інструкцій. Також циклом може називатися будь-яка багатократно виконувана послідовність команд, організована будь-яким чином.

Читайте также

Легкая задачка на циклы.ОБЯЗАТЕЛЬНО с циклами.Pascal. for…do, while…do и repeat…until любой

miheyrus33 [4]

VAR
 ans: Real;
 n, i: Integer;
BEGIN 
 Read(n);
 
 For i := 1 to n do 
 ans := ans + (1 / Sqr(i));
 
 Write(ans);
END.

0 0

4 года назад

Прочитать ещё 2 ответа

Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч (U < V). Время движения лодки по озеру T1 ч, а по реке (пр

Maxim-T

путь по озеру равен V * T1

0 0

4 года назад

Найти все трех значные числа где сумма первого и второго равна третьей

Hrome

Var z1,z2:byte;
begin
for z1:=1 to 9 do begin
    for z2:=0 to 9-z1 do begin
      writeln(z1,z2,z1+z2);
    end;
end;
end.

По просьбе автора задачи - вариант с 3 циклами
var x,y,z:byte;
begin
for x:=1 to 9 do begin
for y:=0 to 9 do begin
   for z:=0 to 9 do begin
   if (x+y=z) then writeln(x,y,z);
    end;
end;
end;
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Сколько единиц в двоичной записи десятичного числа 260?

morec47 [39]

Переводим 260 в двоичную систему счисления и видим:

0 0

3 года назад

Создать массив A(15). Найти MAX среди сумм пар соседних элементов A[1]+A[2], A[2]+A[3] и т.д.

Борис69й

Var a:array[1..15]of integer;
i,max:integer;
Begin
for i:= 1 to 15 do
 a[i]:=random(100);

max:= a[1]+a[2];
for i:= 1 to 14 do
 if max < a[i]+a[i+1] then
 max := a[i]+a[i+1];

writeln(max);
End.

0 0

1 год назад

Прочитать ещё 2 ответа