Написать программу которая 10 раз выводит на экран имя и фамилию

Ниже жирным шрифтом приведен код программы на Паскале. В фигурных скобках обычным шрифтом — комментарии. Можно их оставить — компилятор не сможет их прочитать и программа все равно будет работать. program printname; var first_name, family_name : string; i : byte; begin write(‘Введи свое имя: ‘); readln(first_name); <считываем имя в переменную first_name>write(‘Введи свою фамилию: ‘); readln(family_name); <считываем фамилию в переменную family_name>for i := 1 to 10 do writeln(family_name, ‘ ‘, first_name); end.

// Программа выводит по 10 раз имя и фамилию тремя разными циклами for while // repeat until Program LoopName; Uses Crt; var name,s_name:string; i:integer; begin clrscr; write(‘Введите имя: ‘); readln(name); write(‘Введите фамилию: ‘); readln(s_name); writeln(‘Цикл For’); for i:=1 to 10 do writeln(name,’ ‘,s_name ); writeln; writeln(‘Цикл while’); i:=1; while (i Спасибо Пожаловаться

Источник: cwetochki.ru

Pascal — типизированные файлы