Урок 17 (Решенная задача номер 6)

Урок 17 (Решенная задача номер 6)

Решите предыдущую задачу с использованием процедуры, которая разбирала бы очередную строку, изменяя по ссылке значения двух перемененных (одна для имени и одна для балла), уже после вызова этой процедуры для очередной строки записывайте очередные значения переменных в массивы (каждую в свой).

Подсказка: Т.е. такая процедура может иметь следующую сигнатуру:

Pascal Урок 15 Задача 12

Урок 15 задача 12

Дан массив длиной N (не более 100 элементов). Проверить, что в нем в встречаются все числа от 0 до k, где 0≤k

Урок 17 (решенная задача номер 5)

Урок 17 (решенная задача номер 5)

Пользователь вводит в консоль строки вида (имя + произвольное число пробелов + балл):

Решение задачи 11 из главы 11

Решение задачи 11 из главы 11

11. Вывести на экран все числа от 4 до 100 с шагом 4

program Project11;
var a: integer;
begin
  a:= 0;
  while ( a <= 100) do
  begin
      a:=a+4;
      if (a > 100) then
         break;
      write(a, ' ');
  end;
readln();
end.

Решение задачи 18 из главы 13.1

Решение задачи 18 из главы 13.1

18. Модифицируйте решение предыдущей задачи, так, чтобы длина возрастающего фрагмента каждый раз увеличивалась на единицу (начиная с двух):

Решение с вложенными циклами:

Решение задачи 7 из главы 10.1

Решение задачи 7 из главы 10.1

7. Перебирите в цикле все числа от 1 до 100, выведите на экран каждое 7-е число.

program Project7;
var a: integer;
begin
  a:=0;
  while (a < 100) do
  begin
       a:=a+7;
       if (a >= 100) then
        break;
       write(a, ' ');
  end;
  readln();
end.

Урок 15. Задача №12. Решение.

Урок 15. Задача №12.

Дан массив длиной N (не более 100 элементов). Проверить, что в нем в встречаются все числа от 0 до k, где 0 < k < N

Урок 17 (Решенная задача номер 4)

Урок 17 (Решенная задача номер 4)

Пользователь вводит в консоль строку вида:

Имя         123

-- т.е. слева имя и через произвольное количество пробелов число баллов. Разберите эту строку получив имя пользователя как значение в переменной типа string и число баллов в перееменной типа integer;

Урок 17 (Решенная задача номер 3)

Урок 17 (Решенная задача номер 3)

Пользователь вводит произвольную строку, посчитайте количество чисел в ней - тех, что больше 125. Например, в строке:

123ret34#2145esrt5

такое число только одно и это:

2145

(сначала выделите эти числа из строки и запишите их в массив (of integer), а затем уже посчитайте число тех, что больше 125)

Урок 15 (Решенная задача номер 12)

Урок 15 (Решенная задача номер 12)

Дан массив длиной N (не более 100 элементов). Проверить, что в нем в встречаются все числа от 0 до k, где 0≤k

Pages

Subscribe to fkn+antitotal RSS