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