В алгоритме записанном ниже используются целочисленные переменные а,b и с.Определите значение переменной с после исполнения данного алгоритма а:=35 b:=4 b:=a div b c:a mod b;

231

419

Посмотреть ответы 2

Ответы на вопрос:

sorrypepemain

Информатика

4,8(76 оценок)

c=3

Pascal

var

a, b, c, d:integer;

begin

a := 35;

b := 4;

b := a div b;

c := a mod b;

writeln('c=', c);

end.

Анастасия54546

Информатика

4,8(45 оценок)

Const nn= 50; var a: array[1..nn] of integer; i,j,k,n: integer; f: text; begin write('введите количество чисел: '); read(n); { формирование входного файла } randomize; assign(f,'input.txt'); rewrite(f); for i: =1 to n do begin k: =random(50); writeln(f,k) end; close(f); { чтение входного файла в массив и вывод } reset(f); writeln('элементы массива'); for i: =1 to n do begin readln(f,a[i]); write(a[i]: 3) end; close(f); writeln; { сортировка по возрастанию методом пузырька } for i : = 1 to n-1 do for j : = 1 to n-i do if a[j] > a[j+1] then begin k : = a[j]; a[j] : = a[j+1]; a[j+1] : = k end; { вывод в файл в порядке возрастания } assign(f,'output.txt'); rewrite(f); for i: =1 to n do write(f,a[i]: 3); writeln(f); { вывод в файл в порядке убывания } for i: =n downto 1 do write(f,a[i]: 3); writeln(f); close(f) end.