Var i, pr: Integer; n: String;
Begin
readln(n);
pr := 0;
for i := 1 to length(n) do
if n[i] = ',' then pr := 1;
if pr = 1 then write('Такой символ есть') else write('Такого символа нету');
End.
Я могу только проговорить
взять лукошко
сорвать ягодку
опустить ягодку в лукошко
и это все повторяется несколько раз
если правильно можеш списывать как схему
Виды информации:
1. Текстовая - представленная на каком-либо из существующих языков, например, book - английский язык.
2. Числовая - представленная в виде цифр, например, 1,2,3...
3. Графическая - картины, фотографии, чертежи, схемы и т. д.
4. Звуковая - все, что слышит человек, например, человеческая речь, музыка, пение птиц.
<span>5. Видеоинформация - последовательность изображений, например, фильмы, мультфильмы.</span>
Временное хранение и сортировка файлов