В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
maks200206
maks200206
29.09.2021 01:59 •  Информатика

Определите значение переменной «a» после выполнения фрагмента программы: a = 10 b = 5 if a > 1 or a < b: a -= 5 if a > 1 and a == b: a -= 5 Напишите ответ

Показать ответ
Ответ:
Навруза
Навруза
13.11.2020 10:39

n=str(input())

i=0

e=0

b=["1","2","3","4","5","6","7","8","9","0"]

while(1==1):

if(n[i:i+1] in b):

e=e+1

else:

break

i=i+1

print(e)

Объяснение:

1)Створюємо змінну, значення якої буде число n

2)Створюємо змінну і, щоб цикл працював, і змінну е, значенням якої буде кількість цифр в числі

3)Створюємо масив, елементи якого є всі цифри.

4) Створюємо цикл, робимо так , щоб він працював безкінечно умовою 1==1, адже ми не знаємо наскільки велике число введе користувач.

5) В циклі робимо умову, яка підраховує кількість цифр, і зупиняє цикл, коли цифр більше немає, тобто цикл опрацював усе число.

6) в кінці циклу пишемо і=і+1, щоб цикл поступово опрацьовував усі цифри з числа.

7) Виводимо кількість цифр


Дано натуральне число N, яке вводиться з клавіатури. Визначити скільки цифр в ньому. Python!
Дано натуральне число N, яке вводиться з клавіатури. Визначити скільки цифр в ньому. Python!
0,0(0 оценок)
Ответ:
anjelo4ka
anjelo4ka
09.05.2021 03:35

const n=5;

var a:array [1..n,1..n] of integer;

i,j,k,max:integer;

begin

for i:= 1 to n do

begin

for j:=1 to n do

begin

a[i,j]:=random(21)-10;

write(a[i,j]:5)

end;

writeln;

end;

max:=0;

for i:= 1 to n do

begin

k:=0;

for j:=1 to n do if a[i,j]<0 then k:=k+1;

if k>max then max:=k

end;

if max=0 then writeln ('Нет строк с отрицательными элементами')

else

begin

for i:= 1 to n do

begin

k:=0;

for j:=1 to n do if a[i,j]<0 then k:=k+1;

if k=max then writeln ('Строка, в которой находится наибольшее количество отрицательных элементов ',i)

end

end

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота