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

Viga plus belgium
it is a powerful product for boosting testosterone hormone generation and improving the quality of sexual strive. this mainly involves a stimulated metabolism that will help keep your body in a surplus of energy.

Показать ответ
Ответ:
Нака0987
Нака0987
12.01.2023 09:02

В примере ответы не соответствуют заданию: ищется самая большая цифра а не маленькая, а по условию должна искаться самая маленькая. Написал код, который соответствует именно заданию:

Объяснение:

var

n, k, min, colmin, i: integer;

begin

repeat

Write('Введите число: ');

Readln(n);

until (n>=10000) and (n<=99999);

k := n;

min := k mod 10;

k := k div 10;

for i := 1 to 4 do

begin

if (k mod 10 < min) then min := k mod 10;

k := k div 10;

end;

k := n;

for i := 1 to 5 do

begin

if (k mod 10 = min) then inc(colmin);

k := k div 10;

end;

WriteLn(min, ' ', colmin);

end.

0,0(0 оценок)
Ответ:
WrestlerTeam
WrestlerTeam
12.12.2022 08:51

Переменной a присвоено значение 7. Что будет

выведено на экран монитора в результате выполнения оператора Write(a);

а=7

7

а

Целочисленным переменным a, b, c надо присвоить соответственно значения 15, 22 и 37. Какой оператор ввода соответствует входному потоку 37 22 15?

read (a, b, c);

readln (a, b, c);

read (c, b, a);

write (b, a, c);

Что будет выведено на экран после выполнения следующей программы: var a,s:real; begin a: =3; s: =a*a; writeln('s=', s:3:1); end.

s=9.0

s:=9

9

s=9

С какой команды НЕЛЬЗЯ задать значение переменной a?

С команды присваивания

С команды write(a)

С команды read(a)

Для ввода в оперативную память значений переменных используется оператор

if

write

readln

end

Дан фрагмент программы: s:=414.34394;writeln (s:6:2); После его выполнения на экран будет выведено:

s:=414.34;

414.34394;

414.34;

s:=414.34394;

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