Что значит не отображаются значки? Word и другие компоненты MS Office могут быть не установлены вовсе, может стоять запрет на запуск от администратора, значки (ярлыки) могут быть просто скрыты.
1) упрощаем логическое выражение
2) строим таблицу истинности
n:=5;
x:=0;
for i:=1 to n do
x:=i;
После выполнения цикла значение x будет равно 5
Label1.Caption:=IntToStr(x);
На экран будет выведено 5
var
c: string;
d: byte;
b: boolean;
begin
readln(c);
foreach a: string in System.IO.File.ReadAllLines('in.txt') do
begin
d += 1;
b := false;
if (pos(c, a) > 0) then
begin
b := true;
writeln('Вхождение! Строка №', d, '. Количество вхождений: ', (a.Length - a.Replace(c, '').Length)/c.Length);
end;
end;
writeln(not b ? 'There aren`t :(' : '');
<span>end.
Тут получится сухая блок-схема, но длинная... Воть
Не люблю их</span>
Const
x=0.4;
y=-7.3;
var
s:real;
begin
s:=1+3.17*x*x/y+0.009*Sqrt(Exp((x*y+Exp(x))*Ln(x-y)));
Writeln(s)
end.
<u>Результат</u>
0.932615675312061
Блок-схема (уж не знаю, зачем она нужна) - во вложении.