Напишите программу, которая 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.