Помогите пожалуйста составить блок-схему!
Program abc;
Var i: integer;
a, b: string;
Begin
Write('Введите своё имя: ');
Readln(a);
Write('Введите свою фамилию: ');
Readln(b);
For i:=1 to 10 do writeln(a, ' ', b);
End.
На этот вопрос еще никто не ответил. Напишите свой ответ или воспользуйтесь поиском:
Новые вопросы