решить следующие (программирование, паскаль, операторы div и mod): 1) чему будет равна переменная "с" после выполнения этой программы: a : = 26; b : = 6; c : = a div b + a; ответ: 2) чему будет равна переменная "с" после выполнения этой программы: a : = 24; b : = 5; b : = a mod b + 4; c : = a mod b + 1; ответ: заранее

1)
a := 26;
b := 6;
c := 26 div 6 + 26;
div - целая часть деления 26 на 6, равная 4.
с = 4+26 = 30

2)

a := 24;
b := 5;
b := 24 mod 5 + 4;
mod - остаток от деления нацело 24 на 5. Он равен 4.
b = 4+4 =8

c := a mod b + 1;
c = 24 mod 8 + 1 = 0 +1 = 1

{ Использован код горизонтальной табуляции
 09 для выравнивания вывода }
var
  a,b,h,x:real;
begin
  Write('введите a,b,h: '); Read(a,b,h);
  x:=a;
  while x<=b do begin
    Writeln(x,#09,#09,4*sin(x*x)+cos(x));
    x:=x+h
    end
end.

Пример
введите a,b,h: -2.15 1.7 0.38
-2.15        -4.53120848610505
-1.77        -0.163118638139122
-1.39        3.92156008975769
-1.01        3.9405021385098
-0.63        2.35427225489945
-0.25        1.21874969308017
0.13        1.05915867588807
0.51        1.90145326606337
0.89        3.47673114723651
1.27        4.29273595805526
1.65        1.54860630059752

{ Использован код горизонтальной табуляции
 09 для выравнивания вывода }
var
  a,b,h,x:real;
begin
  Write('введите a,b,h: '); Read(a,b,h);
  x:=a;
  while x<=b do begin
    Writeln(x,#09,#09,4*sin(x*x)+cos(x));
    x:=x+h
    end
end.

Пример
введите a,b,h: -2.15 1.7 0.38
-2.15        -4.53120848610505
-1.77        -0.163118638139122
-1.39        3.92156008975769
-1.01        3.9405021385098
-0.63        2.35427225489945
-0.25        1.21874969308017
0.13        1.05915867588807
0.51        1.90145326606337
0.89        3.47673114723651
1.27        4.29273595805526
1.65        1.54860630059752