Наверное, там улей у "ст". Только здесь не улей, а рой. Выходит У-СТ-РОЙ-СТВО. Но я это не выполнял.
A:= 30;
<span>a:=30;
b:= 6;
a:=30*3/6 после этого a примет значение a:=15, подставляем в условие
if 15>6 </span><span>then (если условие выполняется), а оно выполняется, то решаем первое уравнение
c:= 2*15-5* (6+2) получаем
c:=-10
если писать на паскале, то будет так
var a,b,c:real;
begina:= 30;b:= 6;
a:= a * 3 / b;if a > b then
c:= 2*a - 5*(b+2)else
c:= 2*a + 5*(b+2);
writeln (c);
<span>end.</span></span>
Program num1;
var a : real;
begin
writeln ('vvod chisla');
readln (a);
if a > 0 then writeln ('+')
else writeln ('-');
end.
Разделы документа могут иметь <u>различные стили</u>, <em>формат, иметь разное количество колонок и пр.
</em>
<span>Var s,k: integer;
Begin
s := 0; // переменной s присваиваем начальное значение 0
for k := 3 to 8 do // цикл будет исполнен 6 раз (для k= 3, 4, 5, 6, 7, 8)
s := s + 6; // в теле цикла переменная S (изначально равная 0) каждый раз будет увеличиваться на 6. Т.е. в итоге будет 0+6+6+6+6+6+6=36
writeln(s); // выводим переменную s на экран - будет напечатано 36
End.
---------------------------------
В результате выполнения программы будет напечатано число 36</span>