По разделам

 

Решение задачи Series 16


Дано целое число K и набор ненулевых целых чисел; признак
его завершения — число 0. Вывести номер последнего числа в наборе,
большего K. Если таких чисел нет, то вывести 0.

Код (C/C++)

#include <bits/stdc++.h>

using namespace std;

int main()
{
    int k, j = 0, i = 0, n;
    cin >> k;
    cin >> n;
    while(n){
        if(n > k)
            j = i + 1;
        cin >> n;
        ++i;
    }
    cout << j;
    return 0;
}

Код (Python)

import random

K = random.randrange(2,8)
print("K = ",K)

x = random.randrange(1,5)
print(x,end='; ')
k = 0
N = 0
while x != 0:
    if x > K:
        N = k + 1
    k += 1
    x = random.randrange(-5,7)
    print(x,end='; ')
    
print()
print("Amount of numbers:",k)
print("Serial number of last greater than K:",N)
									

Код (Pascal)

program Series16;
var
 num,i,R,K:Integer;
begin
write('Введите K : ');
readln(K);
R:=1;
i:=0;
num:=0;
 while(R<>0) do
 begin
 i:=i+1;
 write('Введите ',i,' число из набора :');
 Readln(R);
 if R>K then num:=i;
 end;
 Writeln(num);
end.
									

Дополнительно

k = int(input())
a = int(input())
i = 1
idx = 0
while a != 0:
    if a > k:
        idx = i 
    a = int(input())
    i += 1 # ДОПУСТИМ, ЧТО ИНДЕКСАЦИЯ НАЧИНАЕТСЯ С 1
print(idx)
									



Series. Абрамян
Series 1 Просмотров: 4441
Series 2 Просмотров: 2267
Series 3 Просмотров: 2034
Series 4 Просмотров: 2217
Series 5 Просмотров: 2091
Series 6 Просмотров: 2672
Series 7 Просмотров: 2933
Series 8 Просмотров: 3227
Series 9 Просмотров: 1913
Series 10 Просмотров: 2363
Series 11 Просмотров: 1774
Series 12 Просмотров: 2129
Series 13 Просмотров: 1556
Series 14 Просмотров: 1446
Series 15 Просмотров: 1733
Series 16 Просмотров: 2144
Series 17 Просмотров: 1955
Series 18 Просмотров: 2783
Series 19 Просмотров: 2489
Series 20 Просмотров: 1539
Series 21 Просмотров: 1710
Series 22 Просмотров: 1654
Series 23 Просмотров: 2054
Series 24 Просмотров: 1885
Series 25 Просмотров: 1453
Series 26 Просмотров: 1289
Series 27 Просмотров: 1221
Series 28 Просмотров: 1169
Series 29 Просмотров: 1189
Series 30 Просмотров: 1229
Series 31 Просмотров: 1183
Series 32 Просмотров: 1702
Series 33 Просмотров: 978
Series 34 Просмотров: 1026
Series 35 Просмотров: 1405
Series 36 Просмотров: 1514
Series 37 Просмотров: 947
Series 38 Просмотров: 1267
Series 39 Просмотров: 896
Series 40 Просмотров: 1242

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться



Заявка на расчет