М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
КсюшаКотW
КсюшаКотW
10.11.2022 01:50 •  Информатика

For in range (1,5):
print ("*")
сколько звёздочек будет выведено на экран(информатика)​

👇
Ответ:
Wolffy
Wolffy
10.11.2022

4 звездочки будет выведено.

4,8(1 оценок)
Открыть все ответы
Ответ:
Zhamik11
Zhamik11
10.11.2022
Const n=20;
type omas=array[1..n] of integer;
Procedure Del (var z:omas; k:byte); 
var i:byte; 
begin 
for i:=k to n-1 do z[i]:=z[i+1]; 
z[n]:=0; 
end; 
var a:omas; i,b:integer;
begin
Randomize;
for i:=1 to n do
 begin
 a[i]:=random(20);
 write(a[i]:4);
 end;
writeln;
b:=6;
i:=1;
while (i<=n)and(a[i]<>b) do i:=i+1;
if i<=n then
  begin
  Del(a,i);
 writeln('Размерность массива = ',n-1);
 for i:=1 to n-1 do write(a[i]:4);
 writeln;
 end  else writeln('Массив не изменился');
end.
Пример:
  12  13   6   7  17   1  18  17   3   2  12   3  16   6   7  13   0   2   5  18
Размерность массива = 19
  12  13   7  17   1  18  17   3   2  12   3  16   6   7  13   0   2   5  18
4,6(96 оценок)
Ответ:
nikitanehaenko1
nikitanehaenko1
10.11.2022

k = 5

Объяснение:

q = 15 s = 0 i = 1

Цикл с постусловием:

s = s + i

i = i + 1

выход из цикла когда s > q

q = 15 s = 0 i = 1

s = 0 + 1 = 1

i = 1 + 1 = 2

1 > 15 (НЕТ)

q = 15 s = 1 i = 2

s = 1 + 2 = 3

i = 2 + 1 = 3

3 > 15 (НЕТ)

q = 15 s = 3 i = 3

s = 3 + 3 = 6

i = 3 + 1 = 4

6 > 15 (НЕТ)

q = 15 s = 6 i = 4

s = 6 + 4 = 10

i = 4 + 1 = 5

10 > 15 (НЕТ)

q = 15 s = 10 i = 5

s = 10 + 5 = 15

i = 5 + 1 = 6

15 > 15 (НЕТ)

q = 15 s = 15 i = 6

s = 15 + 6 = 21

i = 6 + 1 = 7

21 > 15 (ДА) - выход из цикла

q = 15 s = 21 i = 7

k = i - 2

k = 7 - 2 = 5

4,6(87 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ