Определите порядок действий компьютера при вычислении выражения:

c := a mod 10 div b * 10 + 7 div 2 / 3 * 2
// 1 2 3 4 5 6 7

В ответ запишите семь цифр без разделителей в порядке выполнения операций. Например, ответ 1234567 означает, что все операции выполняются последовательно (сначала 1, потом 2, …)

var

i,j,k: integer;

s,p: string;

begin

p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';

readln(s);

k: =0;

for i: =1 to length(s) do

for j: =1 to length(p) do

if s[i]=p[j] then k: =k+1;

writeln(k);

end.

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

во времена конфуция писали на узеньких дощечках 'из расщепленного бамбука. тонкую кисточку или палочку обмакивали в черную тушь и наносили иероглифы сверху вниз. если делали ошибку, то соскабливали написанное ножом. потом в дощечках делали отверстия и продевали бечевку. связка бамбука и была древнекитайской книгой.

(4 > -(4 + x)·x)) = true

(30 > x·x) = false

4> -4x-x^2

x^2+4x+4> 0

(x+2)^2> 0

x< > -2

(30 < x·x)

|x|> root(30)~5.47

x = 6