УМОЛЯЮ Дана задача Маша и Миша собирали землянику. Маше
удалось сорвать X ягод, а Мише - Yягод.
Поскольку ягода была очень вкусной, то
ребята могли какую то часть ягод
съесть. По нашим подсчетам вместе они
съели Z ягод.
Требуется определить: сколько ягод
ребята собрали в результате
Напишите сколько каких компонентов
нужно будет для создания внешнего
вида формы (например 3 button, 2 edit, 5
label)​

пролететь-расстояниепроехать на лифте-номер этажаспрыгнуть-высота,скоростьпоесть-количествоповернуть-время,напровление

паскаль:

uses crt;

var a,b: string; \ а-слово ,b-символ

i: integer; \ переменная для счета

begin

writeln ('слово и символ');

readln (a,b); \\ввод данных

for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а   и сравнение каждого с символом b. вывод ответа. или ответов 

readkey; \\если символы в слове повторяются

end.

понадобится 24 секунды.

смотри блок-схему в приложенном файле