Вычислите значение целочисленной переменной с при а=26 и b=6: а) с: =div (a, b) +a б) b: =div (a, b) c: =div (a, b)

program p_1

var

a: string

begin

writeln ('vvedite nazvanie rek');

read (a);

if (a='волга,днепро,нёман,енисей')then

writeln ('в беларуси протекают только днепро,нёман');

end.

один, два, три, четыре, пять

12345