Пользователь вводит в консоль строки вида (имя + произвольное число пробелов + балл):
Вася 485
Коля 555
Юра 61
..........
....
end // признак завершения ввода
(пока не введёт строку end) -- где слева указаны имена участников, а справа -- число баллов.
Используя массив строк и массив целых чисел (пусть оба массива будут
максимальной длины =3) считайте отдельно имена и баллы и определите победителя, выведя его имя и полученный им балл.
-- т.е. слева имя и через произвольное количество пробелов число баллов.
Разберите эту строку получив имя пользователя как значение в переменной типа
string и число баллов в перееменной типа integer;
Задайте случайным образом массив из N элементов. Выведите его на экран "ёлочкой". Вот начало такого вывода:
1
2 3
4 5 6
7 8 9 10
11 12 ......
Второй вариант - сделайте то же самое, но не используйте массив: у вас есть переменная N, выведете на экран, все числа до N, по тому же принципе что и выше, например, если N=9, то получим:
Задать двумерный массив размерностью m на n (MxN) элементов (m и n вынести в область определения констант), заполнить его случайными значениями и вывести их на экран уже после того, как весь массив будет заполнен (т.е. заполнять и выводить в разных группах циклов).
Пользователь вводит целые числа, в ответ выводите символ #. Если введенное пользователем число равно 22, то завершите цикл не выводя ничего в ответ. Решите эту задачу 2-мя способами:
С использованием if() и break;
var a: integer;
begin
while (a<>22) do
begin
writeln('vvedite celoe chislo: ');
readln(a);
if (a=22) then
break
else
writeln('#');
end;
write('poka!');
readln();
end.