Статистика
Всего в нашей базе более 4 327 660 вопросов и 6 445 975 ответов!

For m:=2 to 10 do...?

5-9 класс

Sweetng 25 мая 2014 г., 21:46:52 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Rbhbkk2004
25 мая 2014 г., 22:44:22 (9 лет назад)

В чем вопрос? цикл прокрутится 9 раз.

Ответить

Другие вопросы из категории

В гоночном заезде участвовало пять спортсменов: Питер, Джордж, Билл, Ксандр и Майкл. Об итогах заезда имеется 5 высказываний: 1) Выиграл Питер, а Майкл

занял второе место. 2) Ксандр занял второе место, а Питер был последним. 3) Второе место занял Билл, а Джордж оказался третьим. 4) На первом месте был Джордж, а Майкл был четвертым. 5) Майкл был четвертым, а Билл вторым. Известно, что в каждом высказывании только одно утверждение верно, а второе — нет. Определите, кто занял второе место и на каком месте был Билл. Приведите рассуждения по поводу истинности и ложности высказываний

вышла ли гта 5 на компьютер

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

Значение двух массивов А {1..100} и B {1..100} задаются с помощью следующего фрагмента программы:for n:=1 to 100 do A

{n} := (n-80)*(n-80);

for n:=1 to 100 do

B {101-n} :=A {n};

Какой элемент массива В будет наибольшим?

1) В {1} 2) B {21} 3) B {80} 4) B {100}

Перепишите программу на Паскале, исправив ошибки: Program massiv; Var a:array(-10..10) of integer; Begin For i:=1 to 20

Do

Read(a[i]);

For i:=1 to 20 Do

a[i]:=a[i]/10;

For i:=1 to 20 Do

Write(a[i])

End.

Помогите пожалуйста ! срочно надо!!!...в заданной последовательности целых чисел определите сумму элементов кратных 10! пример задачки вот именно под

типо по такой же системе которую щас напишу! program Maximum; i,n,max:integen; begin writeln ( 'введи элементы массива для поиска максимума'); for i:=1 to 10 do begin write ('a [', i ,']=');readln (a [ i ] ) ;end; max:=a[1]; for i = 2 to 10 do if a [ i ] > max then begin max:=a [ i ] ; n:= i ; end; writeln ('найти наибольший элемент ',max ,' под номером ', n); вот наподобие этого примера нужно построить мою задачу! в заданной последовательности целых чисел определите сумму элементов кратных 10. Помогите пожалуйста!!!

В программе описан одномерный целочисленный массив с индексами от 0 до 10. В приведенном ниже фрагменте программы сначала заполняеться, а потом

изменяеться: for i:=0 to 10 do A[i]:= i + 1; for i:=1 to 10 do A[i]:= A[i-1]; Как изменяються элементы этого массива? 1) все элементты, кроме последнего, сдвинаются на 1 элемент вправо 2) все элементы, кроме первого, сдвигаются на 1 элемен влево 3) все элементы окажутся равны 1 4) все элементы окажутся равны своим индексам

Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41;

Dat[5] := 14; Dat[6] := 21;

Dat[7] := 28; Dat[8] := 11;

Dat[9] := 15; Dat[10] := 35;

m := 50;

for k := 1 to 10 do

if Dat[k]<m then

begin

m := Dat[k]

end;

writeln(m);

End.



Вы находитесь на странице вопроса "For m:=2 to 10 do...?", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.