Имеется часть катушки с автобусными билетами. составить программу находящую номера счастливых билетов на катушке, если меньший номер билета на катушке - n, больший - m. номера билетов шестизначные, билет считается счастливым если сумма трех его первых цифр равна сумме трех последних.
оператор присваивания : =
оператор ввода read(x1,) или readln(x1,)
оператор вывода write(x1,) или writeln(x1,)
условный оператор if условие then оператор 1 else оператор 2
оператор варианта case переменная of
набор значений1: оператор1;
набор значений2: оператор2;
набор значенийn: операторn
else
альтернативный оператор
end;
оператор цикла с предусловиями while do
оператор цикла с постусловием repeat until
оператор цикла for do
оператор break осуществляет немедленный выход из циклов repeat, while, for.
оператор continue начинает новую итерацию цикла, даже если предыдущая не была завершина.
оператор exit осуществляет выход из подпрограммы.
оператор halt прекращает выполнение программы и возвращает код завершения в операционную систему.
1. введите n.
2. цикл for от 1 до n будем вводить 'элементы массива x[i]/
3. в цыкле от 1 до n бедем выводить на экран массив writeln(x[i]) и считаем сумму. если в программе выполнять, то это будет выглядеть так
write('введите n'); readln(n);
for i: =1 to n do begin write('введите ',i,' элемент массива');
readln (x[i]);
end;
sum: =0;
for i: =1 t0 n do begin
write(' ',x[i]);
sum: =sum+x[i];
end;
write('а сумма всех элементов = ',sum);