Запишите значение переменной s, полученное в результате работы следующей программы: var s,k: integer; begin s : = 0; for k : = 5 to 13 do s : = s + 7; writeln(s); end.
235
350
Ответы на вопрос:
ответ:
объяснение:
алгоритм:
1) определяем первую, вторую и третью цифру
2) ищем минимальную цифру числа
3) считаем их количество
var a, sotni, desatki, edinicy, min_number, n: integer;
begin
read(a);
sotni : = a div 100;
desatki : = a div 10 mod 10;
edinicy : = a mod 10
if sotni < desatki then
begin
if desatki < edinicy then min_number : = sotni
else
if sotni < edinicy then min_number : = sotni else min_number : = edinicy
end
else
if desatki > edinicy then min_number : = edinicy
else
min_number : = desatki;
n : = 0;
if min_number = desatki then n += 1;
if min_number = sotni then n += 1;
if min_number = edinicy then n += 1;
print(n)
end.
теперь рассказываю, почему надо учить питон. та же программа:
number = list(map(int,
print(number.count(min(
Популярно: Информатика
-
Евгениямагическая16.12.2021 02:01
-
daniil809222812.06.2022 17:31
-
natalia167618.05.2021 15:59
-
юлия165725.08.2020 03:23
-
сорин888819.01.2023 17:51
-
nastyan85395816.01.2023 11:40
-
egorkakraynov26.11.2020 09:59
-
boykina2221.12.2021 08:15
-
yyuyuy06.04.2020 02:04
-
zakriev76718.08.2020 09:35