Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program first;
var z,d,k: integer;
begin
writeln('input z,d,k');
readln(z,d,k);
if (d> =z) then
d: =d-z
k: =k+1
writeln(d,' ',k);
readln;
end.
var
x: real;
readln(x);
writeln(x: 0: 0);
если массив состоит из 10 элементов то код программы:
const
n=10;
a: array[1..n] of integer;
i,min: integer;
for i: =1 to n do read(a[i]); {вводишь заданный массив}
min: =32767;
for i: =1 to n do
if a[i]< min then min: =a[i];
write(min);
end;
в результате выполнения первого цикла
for i: =1 tо n do a[i] : = i
в массиве будут находится числа от 1 до 10 по возрастанию
j: =1
затем 9 раз сравнивается предыдущий элемент с последующим и если последующий больше предыдущего то j увеличивается на 1
так как в массиве каждый последующий элемент больше предыдущего то j увеличится на 9
значит j станет равно 10
Популярные вопросы