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

ВОПРОС 3 МИГАЮЩАЯ ВЕРТИКАЛЬНАЯ ЧЕРТА НА ЭКРАНЕ В ТЕКСТОВОМ РЕДАКТОРЕ -это...?
А)УКАЗАТЕЛЬ
Б)КУРСОР.
В)ПРОБЕЛ​

Показать ответ
Ответ:
Эвридэй
Эвридэй
28.04.2021 21:33
{ задание 1}
const
  n=17;
var
  a:array[1..n] of integer;
  i,k:integer;
begin
  Randomize;
  k:=0;
  for i:=1 to n do begin
    a[i]:=Random(99)+1;
    Write(a[i],' ');
    if a[i] mod 2=0 then k:=k+1
    end;
  Writeln;
  Writeln('k=',k)
end.

Пример
43 86 43 13 24 18 93 38 38 59 15 75 12 92 8 72 8
k=10

{ задание 2/3}
const
  n=17;
var
  a:array[1..n] of integer;
  i,s:integer;
begin
  Randomize;
  s:=0;
  for i:=1 to n do begin
    a[i]:=Random(99)+1;
    Write(a[i],' ');
    if a[i] mod 10=2 then s:=s+a[i]
    end;
  Writeln;
  Writeln('s=',s)
end.

Пример
58 39 12 24 91 57 14 44 47 61 31 10 95 54 42 98 76
s=54
0,0(0 оценок)
Ответ:
КликКлак11
КликКлак11
20.09.2020 02:29
<<A>>

a = [int(x) for x in input("Введите три целых числа:\n").split()]
max = a[0]
for i in a:
if i > max:
max = i
print("Максимальное число: {}".format(max))

<<B>>

a = [int(x) for x in input("Введите пять целых чисел:\n").split()]
max = a[0]
for i in a:
if i > max:
max = i
print("Максимальное число: {}".format(max))

<<C>>

ages = []
names = ["Антон", "Борис", "Виктор"]
for name in names:
ages.append(int(input("Возраст {}а: ".format(name
j = 0
M = []
m = max(ages)
for age in ages:
if age == m:
M.append(j)
j += 1
if len(M) == 1:
print("{} старше всех.".format(names[M[0]]))
elif len(M) == 2:
for i, v in enumerate(names):
if i not in M:
young = v
print("{} и {} старше {}а.".format(names[M[0]], names[M[1]], young))
else:
print("Все трое одного возраста.")
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота