Задача 3 Урок 17

Задача 3 урок 17

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

123ret34#2145esrt5

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

2145

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

Задача 2 Урок 17

Задача 2 урок 17

Пользователь вводит строку произвольных символов, посчитайте количество цифр в ней, численное значение которых больше либо равно 5.

program U17Z2;
var s: string;
    i,code,v,kol: integer;
begin
  writeln('vvedite stroku');
  readln(s);
  kol:=0;
  for i:=1 to length(s) do
  begin
    val(s[i],v,code);
    if (v>=5) then
      kol:=kol+1;
  end;
  writeln('kolichestvo cifr >=5 : ',kol);
  readln();
end.  

Задача 1 Урок 17

Задача 1 урок 17

Пользователь вводит строку, проверьте является ли она числом, если да, то выведите в ответ это число, иначе сообщите об ошибке.

program U17Z1;
var s: string;
    i,code: integer;
begin
  writeln('vvedite stroku');
  readln(s);
  val(s,i,code);
  if (code<>0) then
    writeln('oshibka v poz: ',code)
  else
    writeln('chislo = ',i);
  readln();
end.      

Задача 9 урок 17

Задача 9 урок 17

Задана последовательность символов, имеющая следующий вид: p1q1p2q2p3...qn–1pn , где pi — цифра, а qi — знак арифметического действия из набора {+, –, *}. Вычислите значение выражения, предполагая, что действия выполняются согласно правилам арифметики.
Входные данные: На вход программе подается строка указанного вида, состоящая не более чем из 9 чисел, разделенных символами арифметических операций.
Выходные данные: Выведите значение арифметического выражения.
Примеры:

Задача 9 Урок 16

Задача 9 Урок 16

Пользователь вводит исходную строку s.
Ваша программа должна вернуть другую строку, в которой все смежные (соседние) повторяющиеся символы должны быть "удалены" (т.е. повторов в новой строке быть не должно), например:
для строки:

5533g
вернуть:

53g
для строки:

b5ghh55788oooggtttttt
вернуть:

b5gh578ogt

Задача 8 Урок 16

Задача 8 Урок 16

Проверить можно ли строки из m перестановкой символов получить строку n.
Примеры (входные данные и ответ):

abc и bca
-- можно

abc и baa
-- нельзя

abcc и cbac
-- можно

abc4c и cb55ac
-- нельзя

#16 Двумерные и Многомерные массивы в Паскаль

Многомерный массив - это такой массив, в котором элементы (кроме самого младшего уровня) сами являются массивами.

Классическим примером данных, которые удобно хранить в двумерном массиве является любая таблица, где в каждой строке равное число элементом, например:

1 2 4 5
1 3 4 7
8 9 5 6

Или возьмем вариант с меньшим числом элементов:

1 2 4
8 3 4 

И сразу же напишем для него код:

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

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

Дан массив длиной N (не более 100 элементов). Проверить, что в этом массиве на отрезке индексов от m до p ( 1≤m

Задача 14 Урок 15

Задача 14 Урок 15

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

.

Задача 13 Урок 15

Задача 13 Урок 15

Напишите функцию, которая принимает на вход целое число N и возвращается строку, содержащую арифметическое выражение вида:
a1 # a2 # ..... # aN
Где:
a1, a2,....., aN -- случайные числа из диапазона от 1 до 100
# - один из случайных знаков (*, +, -)

Pages

Subscribe to fkn+antitotal RSS