Урок 17 Задача 4
Primary tabs
Пользователь вводит строку произвольных символов, запишите первые 8 символов цифр в массив и выведете этот массив на экран.
Подсказка: массив должен быть "of char".
var s: string; i: integer; m: array [1..8] of char; begin write ('Введите произвольную строку: '); readln(s); if (length(s) < high(m)) then // если в строке символов меньше, чем элементов в массиве writeln ('Ошибка') else for i:=low(m) to high(m) do // обходим строку по количеству элементов в массиве begin m[i]:= s[i]; write (m[i], ' '); end; readln(); end.
Вывод в консоли:
Введите произвольную строку: adhgsdhfsghsf34bgdf a d h g s d h f
- Log in to post comments
- 341 reads
vedro-compota
Sun, 12/25/2022 - 13:11
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)