Предложите программу на Pascal
Я хочу написать простую программу на Pascal что вы предложите если что я новичок
напиши червяка который ползет от начала строки до конца окна консоли и потом снова выползает в начале строки, и так по кругу. червячок состоит из трех или более символов. для усложнения задачи - червячок должен сам находить конец окна консоли после ручного изменения ширины окна и не должен оставлять следов и рваться. можно использовать только модуль crt.
Дан массив, в котором некоторые данные упорядочены. Из этих данных составить второй массив такого же размера, в котором они расположены случайным образом. Запрещается использование рекурсии и вложенных циклов.
Грубо говоря, одним легким движением перетасовать новую колду карт.
ля начала на Pascal рекомендую простые задачи:
Калькулятор — базовые операции (сложение, вычитание, умножение, деление)
Конвертер единиц — например, температуры (Цельсий ↔ Фаренгейт)
Игра "Угадай число" — компьютер загадывает число, пользователь угадывает
Простые вычисления — площадь/периметр фигур, факториал числа
Советы для новичка:
Начните с Free Pascal или PascalABC.NET (удобная среда для обучения)
Изучите базовые конструкции: переменные, условия (if-else), циклы (for, while)
Начните с консольных программ
Для более детального обсуждения, выбора конкретной задачи и получения примеров кода создайте тему на форуме: https://forensicanvil.ru/forum — там можно обсудить детали и получить помощь от сообщества.
Подсчет различных букв в слове
var s:string;
r:real;
i,j,n:integer;
begin
r:=0;
readln(s);
for i:=1 to length(s) do begin
n:=0;
for j:=1 to length(s) do begin
if s[i]=s[j] then inc(n);
end;
r:=r+1/n;
end;
writeln('количество различных букв = ', r:1:0);
end.