|много | написать код на языке паскаль, перевод дюймы в сантиметры.

В 1 дюйм = 2.54 сантиметра
var inch: real;
begin
  write("Введите кол. дюймов: "); readln(inch);
writeln(inch," дюймов равно ", inch*2.54," сантиметров");
end.

Program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
write ('Введите количество дюймов: ');
readln(d);
s := d*m;
writeln (d, ' дюймов = ', s, ' сантиметров')
end.

Упрощенный вариант:
program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
readln(d);
s := d*m;
writeln (s)
end.

var a: array [1..10] of integer;

   ch, proiz, i: longint;

begin

read(a);

ch := 0;

proiz := 1;

for i := 1 to 10 do

begin

   if (a[i] mod 2 = 0) then

       ch := ch + a[i];

   if (a[i] mod 5 = 0) and (a[i] > 10) then

       proiz := proiz * a[i];

end;

writeln(ch);

writeln(a[i]);

end.

Объяснение:

создаем массив из десяти элементов и две переменные: ch(сумма), proiz(произведение).

Далее вводим массив с клавиатуры и в цикле начинаем проверять его элементы:

Если остаток от деления(mod) равен нулю(т.е число делится на два), то мы просто пихаем его в сумму, а если число делится на пять и больше десяти, то мы запихиваем его в произведение(перед циклом proiz = 0, так как 0 * любое число = 0).

После завершения цикла выводим сумму и произведение на экран.

Надеюсь всё понятно)

A=5

Объяснение:

74 mod A = 4

Остаток меньше делителя, поэтому A>=5

Подставляем 5 в основание системы счисления и проверяем результат.

74/5=14 остаток   4

14/5=2 остаток   4

2/5=0 остаток   2

Десятичное число 27 в пятиричной системе счисления записывается как 244. Следовательно A=5

Как решать подобные задачи.

1.

Согласно правилу перевода десятичного числа M в A-ричную систему, в последний разряд A-ричного числа записывается остаток от M/A. То есть M mod A = R, где R – значение последнего разряда A-ричного числа. Вспоминаем что остаток всегда меньше делителя, поэтому A>=R+1. В рассматриваемой задаче A>=5.

Определение нижней границы значения A, позволяет сузить поиск. В рассматриваемой задаче мы с первого раза вышли на верное значение, но так бывает не всегда.

2.

Представим число M в следующем виде: M=A*B+R, где A - основание системы счисления, а R – остаток. В рассматриваемой задаче эта запись приобретает следующий вид: 74=A*B+4 или 70=A*B. То есть необходимо найти такие целые числа, чтобы их произведение равнялось 70.

Рассмотрим варианты A*B.

1*70

2*35

5*14

7*10

В первом пункте мы выяснили, что A>=5, поэтому первые два варианта отпадают. Остаются варианты 5*14 и 7*10.

Проверив истинность высказываний 74 mod 5 = 4 и 74 mod 7 = 4, убеждаемся, что A=5.

3.

Зная разрядность, также можно производить вычисления.

Обозначим разрядность через N.

N= [L]+1 , где L – значение логарифма от M по основанию A. Квадратные скобки – обозначают целое значение.

В рассматриваемой задаче, число M в A-ричной системе счисления трехзначное. То есть N=3.

3=[L]+1

[L]=2

Для проверки разрядности значения A*B в системе счисления A, следует проверить истинность выражения N= [L]+1.

В рассматриваемой задаче, это условие соблюдается только когда A принимает значения 5, 6, 7 или 8. Только при таких значениях A, число M в A-ричной системе счисления A будет трехзначным.  

Числа 6 и 8 не подходят, поскольку второй множитель B также должен быть целочисленным.

Остаются числа 5 и 7.

Проведя проверку на остаток от деления 74 mod 5 = 4 и 74 mod 7 = 4, получаем искомое значение A=5.