profile
[/banner_gorizont_adaptive]
Размещено 5 лет назад по предмету Информатика от Foantik

Var k, m, t : integer;
Dat: array[1..10] of integer;
Begin
Dat[1] := 36; Dat[2] := 50;
Dat[3] := 23; Dat[4] :=41;
Dat[5] := 27; Dat[6] := 22;
Dat[7] := 59; Dat[8] := 12;
Dat[9] := 65; Dat[10] := 35;
m := 0;
for k := 1 to 10 do
if Dat[k] >m then
begin
m := Dat[k];
t := k
end;
writeln(k)
End.

  1. Ответ на вопрос
    Ответ на вопрос дан allangarsk
    Var k, m, t : integer; Dat: array[1..10] of integer; Begin Dat[1] := 36; Dat[2] := 50; Dat[3] := 23; Dat[4] :=41;Dat[5] := 27; Dat[6] := 22;Dat[7] := 59; Dat[8] := 12; Dat[9] := 65; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] >m then begin m := Dat[k]; t := kend; writeln('m = ',m, '  t= ',t) End.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.