Требуются пояснения насчёт. Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию.

В этом примере необходимо написать программу, которая будет 10 раз выводить на экран имя и фамилию (PascalABC.NET).

Текст программы обычно состоит из 3 частей:



заголовок;


описание переменных;


операторы.





Заголовок программы – это её имя, расположенное в самом начале кода.

Пусть данная программа называется «NameSurname».

Далее необходимо в блоке «Var» описать переменные, которые будут использоваться.

Например, присвоим переменной i тип integer. Это значит, что i может иметь только целые значения.

Если же присвоить Name и Surname тип string, то эти две переменные смогут иметь только строковые значения.


После var необходимо написать служебное слово begin (начало), а в конце кода - end (конец).


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



write (writeln);


read (readln);


for to do.





Операторы write и read


Write – это оператор вывода данных на экран.

Если в коде написать write('Введите своё имя: '), то на экран выскочит срока «Введите своё имя: ».

Read – это оператор ввода с клавиатуры каких-либо данных.

В коде строка read(Name) присваивает строковой переменной Name введенное значение.

Writeln и readln – это аналог write и read с переносом курсора на новую строку.


Оператор for to do


For to do – это оператор цикла с известным числом повторений.

Например, строка for i:=1 to 10 do writeln(Name, ' ', Surname) означает, что от 1 до 10 будет осуществляться вывод на экран имени и фамилии.


В итоге получаем следующую программу


Program NameSurname;

Var i: integer;

Name, Surname: string;

Begin

Write('Введите своё имя: ');

Readln(Name);

Write('Введите свою фамилию: ');

Readln(Surname);

For i:=1 to 10 do writeln(Name, ' ', Surname);

End.


-------
var first_name, last_name : string; // где first_name — имя, а last_name — фамилия.

i : integer;

begin

cls;

write ('Введите свое имя: ');

readln (first_name);

write ('Введите свою фамилию: ');

readln (last_name);

for i := 1 to 10 do writeln (first_name, ' ', last_name);

end.