- Код: Выделить всё
type
arr1=array[1..5] of string;
arr2=array[1..5] of integer;
var
a:arr1;
b:arr2;
Begin
For i:=1 to 5 do
begin
writeln('write your name and grade ');
readln(a[i],b[i])
end;
Модератор: Модераторы
type
arr1=array[1..5] of string;
arr2=array[1..5] of integer;
var
a:arr1;
b:arr2;
Begin
For i:=1 to 5 do
begin
writeln('write your name and grade ');
readln(a[i],b[i])
end;
Снег Север писал(а):Потому, что в запросе "write your name and grade" просят сначала ввести имя, а потом оценку, а не наоборот
Nick245 писал(а):Издеваешься, да ?
readln(b[i],a[i])
Deimos писал(а):Вот тебе ввод сначала стринг, потом инт.
SSerge писал(а):А введёт ли?
В строковую переменную, ЕМНИП, должно попасть всё содержимое ввода до символа перевода строки, а что в такой форме попадет в переменную integer?
SSerge писал(а):Содержимое следующей введенной строки?
SSerge писал(а):В си, спецификация "%s" на вводе принимает порцию информации, ограниченную любыми непечат(ающимися) символами, что делает методику непригодной для ввода строк, содержащих пробелы
Вернуться в Free Pascal Compiler
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3