Используя операторов div и mod, составить алгоритм нахождения суммы и произведения цифр двузначного числа. .

Var
  N, f, s: byte;

begin
  write('N = ');
  readln(N);
  f := N div 10; 
  s := N mod 10;
  writeln('Сумма цифр: ', f+ s);
  writeln('Произведение цифр: ', f* s);
end.

Задание №7

Знак « : = » называется «присвоить». Если простыми словами, то это переводится как «равно»

а) c : = a + 1/3

Это значит: с равно а + 1/3

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

Если подставить а, то получится:

с : = а + 1/3

с : = 2 + 1/3

с : = 2 целых 1/3 (это и есть ответ)

Во всех остальных примерах этого задания надо делать тоже самое. Вместо а подставлять 2, а вместо b ставить 3, потом всё решать как обычный пример по математике

Задание №8

В этом задании есть такие знаки:

: = - присвоить (или равно)

div - разделить (если при делении будет остаток, его писать не надо. Выписывается только целое число)

mod - разделить и написать остаток (например, если написано: 9 mod 4. Нужно 9 разделить на 4 и написать число, которое осталось. Девять без остатка разделить нельзя, значит, берём ближайшее делимое число, которое меньше девяти - это 8. Потом из девяти вычитаем восемь и получаем один. 1 и надо выписать. То есть, 9 mod 4 = 1 )

а) с : = а mod b + b

c : = 26 mod 6 + 6

c : = 2 + 6

c : = 8

Сначала посчитать 26 mod 6 (получится 2), а потом прибавить 6

б) c : = a div b + a

с : = 24 div 6 + 26

c : = 4 + 26

с : = 30

Сначала посчитать 24 div 6 (24 разделить на 6 и выписать целое число. То есть 4)

в)

b : = a div b

c : = a div b

В данном примере несколько строк. Считаем первую:

b : = a div b

b : = 26 div 6

b : = 4

Теперь, чтобы посчитать вторую строку задачи, вместо b надо ставить не 6, а 4, потому что в первой строке мы посчитали и присвоили b : = 4. Всегда так надо делать. (Например, если в начале задачи написано, что х : = 1, то в самый первый раз так и надо считать. Но если потом в каком-то примере х станет 3, то теперь это и будет новое значение, с которым надо работать. Запомни правило: какое значение последнее, то и использовать.

Весь пример этой задачи будет выглядеть так:

b : = a div b

c : = a div b

b : = a div b

b : = 26 div 6

b : = 4

с : = a div b

c : = 26 div 4 (взять последнее значение b, то есть 4)

c : = 6 (это ответ)

Остальные примеры решаются также

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
  Write(Range(300,400,2).Sum)
end.

Результат выполнения программы:
17850

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
  Range(104,999,8).Print
end.

Результат выполнения программы:
104 112 120 128 136 144 152 160 168 176 184 192 200 208 216 224 232 240 248 256 264 272 280 288 296 304 312 320 328 336 344 352 360 368 376 384 392 400 408 416 424 432 440 448 456 464 472 480 488 496 504 512 520 528 536 544 552 560 568 576 584 592 600 608 616 624 632 640 648 656 664 672 680 688 696 704 712 720 728 736 744 752 760 768 776 784 792 800 808 816 824 832 840 848 856 864 872 880 888 896 904 912 920 928 936 944 952 960 968 976 984 992