Помогите пожалуйста. Это работа на компьютере. Создайте проект, в котором можно вычислить количество двузначных
чисел среди чисел, первое из которых равно 10, а каждое последующее
больше предыдущего на заданное положительное число. Буду благодарна за помощь в решении.
чисел среди чисел, первое из которых равно 10, а каждое последующее
больше предыдущего на заданное положительное число. Буду благодарна за помощь в решении.
More Questions From This User See All
Answers & Comments
Программа на Python:
n, q = int(input('Задайте последнее число цикла: ')), int(input('Задайте значение возрастания чисел: '))
l = 10
count = 0
a = [10]
for i in range(n-1):
l+= q
x = l
count = 0
while x:
count += 1
x //= 10
if count == 2:
a.append(l)
print('Двузначные числа:', *a)
Программа на PascalABC.NET:
var n, q, x, count, m, count1, l, i: integer;
a: array[1..100] of integer;
begin
l := 10;
a[1] := 10;
count := 0;
count1 := 1;
writeln('Задайте последнее число цикла: ');
readln(n);
writeln('Задайте значение возрастания чисел: ');
readln(q);
for i:= 1 to n-1 do begin
l := l + q;
x := l;
count := 0;
while x <> 0 do begin
count := count + 1;
x := x div 10;
end;
if count = 2 then begin
count1 := count1 + 1;
a[count1] := l;
end;
end;
write('Двузначные числа: ');
for m:=1 to count1 do begin
write(' ', a[m]);
end;
end.