1. Информатика
  2. Дано трехзначное число. вывести

Дано трехзначное число. вывести порядковый номер его минимальной цифры. паскаль

mdasa7375 mdasa7375    1   01.04.2019 10:10    2

Ответы
G89 G89  28.05.2020 05:02

var

  n, min : integer;

  a : array [1..3] of byte;

begin

  read (n);

  a[1] := n div 100;

  a[2] := n div 10 mod 10;

  a[3] := n mod 10;

  min := 1;

  if a[2] < a[min] then min := 2;

  if a[3] < a[min] then min := 3;

  writeln (min);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
TuttiFrutti56 TuttiFrutti56  13.05.2020 21:38
информатика!Определите значение переменных S После выполнения следующих операторов.s: =0;i: =1;repeats:=s+i;i:=i+1;until i 8;write (s);​...
cat0000000 cat0000000  13.05.2020 21:39
жауабын беріңдерш информатика ​...
neznaika167 neznaika167  02.08.2019 11:30
Информационный объем статьи,набранной на компьютере ,составляет 30кбайт. определите сколько страниц содержит статья, если известно, что на каждой странице 32 строки,...
бобгороха бобгороха  19.07.2019 03:40
Решить на pasсal. во всех массив состоит из 10 элементов и задаётся из интервала от 1 до 99. 1.написать программу, которая выводит на экран все четные элементы массива...
GardenBrid GardenBrid  19.07.2019 03:40
Укажите количество ячеек в диапазонах. a) a1: b5 b)g23: g153 c)b11: d13...
zhimagulova zhimagulova  19.07.2019 03:40
Написать программу, которая выводит текстовое описание числа. на вход числа от 100 до 399. на выходе число текстом. например, на вход 217 вывод: «двести семнадцать»...
aftullaeva2 aftullaeva2  19.07.2019 03:40
Написать программу, которая, решает квадратное уравнение |ax+b|=cx+d. на вход вы получаете a,b,c,d. на выходе должно быть, либо 2 корня если таких 2, либо 1, либо...
nmh788 nmh788  19.07.2019 03:40
Укажи минимальный объём памяти (в битах), достаточный для хранения любого растрового изображения размером 79×79 пикселя, если известно, что в изображении используется...
5ксюША88881 5ксюША88881  22.07.2021 11:35
Исполнитель Редактор получает на вход строку цифр и преобразовывает её. Редактор может выполнять две команды, в обеих командах v и w обозначают цепочки цифр. заменить...
Дмитрий1425 Дмитрий1425  22.07.2021 11:36
Нужно чтобы цыфра была к букве это питон d = [] for i in range(1, 6): a = int(input( Ведите число: )) d.append(a) print(d) b = [] for i in range(1, 6): n = input(...

Популярные вопросы