1) 0+2 = 2
2) 2-1 = 1
3) 2
4) 1+2 = 3
Значит наша диграмма должна состоять из частей подходящих под цифры-пропорции 2,1,2,3.
Под эти цифры полностью подходит диаграмма № 1 ( на фото не видно какой номер,но должно быть 1 :) ). В левом верхнем углу.
Вот получилось так, надеюсь понятно.
11 строка не стоит точка с запятой
1)
begin
var a:=ArrRandomReal(15,38,39);
a.Println;
end.
2)
begin
var a := ArrRandom(20, 0, 5);
Writeln('Последовательность ');
a.Println;
Writeln('Нечетные ');
a.Where(x -> odd(x)).Println;
end.
В нижнюю часть вводите текст который проверяется на достаточное количество букв, в верхнюю часть вводите искомое слово. Программа различает прописные и строчные буквы.
<span>Саму программу можете увидеть Alt+F11
</span>