Паскаль

Программирование (Е. В.

var
  a, b, c: integer; // глобальные переменные
  p: ^integer; // Тип: указатель на integer
 
begin
 
 a := 5;
 writeln('a= ', a);
 // f1(a);
 p := @a; { получаем указатель на переменную a 
(на область памяти, где лежит её значение) }
 writeln('p= ', p^); {смотрим что лежит в области памяти,
 на которую указывает указатель  p }
 
 p^ := 9; // Запись "по ссылке"
 writeln('p= ', p^);
 writeln('a= ', a); // значение изменилось тоже, хотя мы не меняли его явно
 
 readln();
end.

Урок 14 задача 2

Напишите процедуру, которая выводит на экран сумму трёх целых чисел.

Урок 14 задача 1

Напишите функцию, которая возвращает сумму трёх целых чисел.

var
  a, b, c, d: integer;
procedure sum(x, y, z: integer; var v: integer); // начало объявления процедуры
begin
     v := x + y + z;   // задаем процедцру
end; // конец тела процедуры

begin // начало тела программы
      write('Введите два числа: ');
      readln(a, b, c);
      sum(a, b, c, d);
      writeln(d);
      readln();
end.
             

Для того чтобы писать программы обычно требуется минимум две вещи:

Задача №2

Пользователь вводит целые числа. Пока он не введёт число большее 15, в ответ на каждое введённое число выводите сумму этого числа и предыдущего введённого им числа, если же введённое число больше 15, то цикл необходимо завершить.
Первое введенное пользователем число можно сложить с единицей.

Как понять

число выводите сумму этого числа и предыдущего введённого им числа

Как вернуть предыдущее введенное число?

О чем

В учебных задачах по программированию (в т.ч. информатике в школе) любят накладывать ограничения вроде "Используя операции деления нацело и взятия остатка от деления...[сделайте то-то и то-то]" (например) обычно речь далее идёт о получении цифр числа с помощью этих операций и дальнейшей работе с ними.

Может возникнуть вопрос: как использовать эти операции для получения цифр числа? Об этом и расскажет данная заметка.

(урок в процессе разработки)

После изучения способов чтения файла в Паскале, перейдём к вопросу записи в них данных.

Пример чтения и записи текстового файла:

Ответы

Ответы можно найти здесь.

Вопросы

На любой вопрос необходимо предоставлять помимо теоретического ответа пример: