сервис вопросов и ответовКак сделать так чтобы все значения массива считывались из одной строки. паскаль
5-9 класс|
|
Kostyachervanev
28 сент. 2013 г., 6:44:53 (10 лет назад)
Ulyana111002
28 сент. 2013 г., 8:24:03 (10 лет назад)
var
str, str1: string;
arr: array [1..256] of byte;
i, i2: byte;
err: integer;
begin
readln(str);
str := concat(str, ' ');
for i := 1 to length(str) do
begin
if (str[i] = ' ') then
begin
i2 := i2 + 1;
val(str1, arr[i2], err);
str1 := '';
end
else
str1 := concat(str1, str[i]);
end;
for i := 1 to length(str) do
write(arr[i]:4);
end.
Qazmurad
28 сент. 2013 г., 9:38:59 (10 лет назад)
Разделить из, какой именно паскаль и какой тип данных в массиве? Байты, символы, строки?
Tanag0
28 сент. 2013 г., 11:51:10 (10 лет назад)
free pascal 2.6.0 тип байты
женя4445
28 сент. 2013 г., 12:31:58 (10 лет назад)
То есть, Вам нужно считать коды символов строки в массив, так?
ждан15
28 сент. 2013 г., 15:10:47 (10 лет назад)
Мне даны числовые значении через пробел. Мне нужно чтобы каждое значение записалась в массив.
Ответить
Другие вопросы из категории
Решить задачу. Две хозяйки купили 8 литров молока. У одной 5 литров в 6-литровом бидоне, у другой 3 литра в 5-литровом бидоне. Они решили разделить все мол
око поровну, по 4 литра, пользуясь еще одним, 2-литровым бидоном. Как это сделать?
Информатика (Pascal):
Написать программу для след задачи:
Найти среднюю температуру, если кол-во n дней, когда t >=5.
Вывести ДА или НЕТ
Читайте также
Ребят, срочно!! Вы видите диски OS и DATA! Как вы видите на диске DATA больше места чем на OS! Ребят как сделать так чтобы все загрузки переходили не на
OS, а на DATA?
Пожалуйста быстрее!!
Как сделать так, чтоб текс программы открытый в блокноте (который на русском) был в нормальном шрифте , а не была билибирда? Типо такого:
outtextxy(15,180,'„ўЁ¦ҐЁҐ ⥫ ,Ўа®иҐ®Ј® Ј®аЁ§®в «м® б з «м- ');outtextxy(110,210,'®© бЄ®а®бвмо Ї® гЈ«®¬ Є Ј®аЁ§®вг');
Здравствуйте! Мы сделали кнопки в PascalABC.Net. Как сделать так, чтобы когда на них нажимаешь, то выводился на экран текст. Заранее спасибо.
Вот код программы:
uses GraphABC, ABCObjects,ABCButtons;
begin
MaximizeWindow;
var btword := new ButtonABC(50,125,500,100,'Играть',clWhite);
var btword1 := new ButtonABC(50,325,500,100,'Настройки',clWhite);
var btword2 := new ButtonABC(50,525,500,100,'Правила',clWhite);
var btword3 := new ButtonABC(50,725,500,100,'Выход',clWhite);
end.
Вы находитесь на странице вопроса "Как сделать так чтобы все значения массива считывались из одной строки. паскаль", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.