Определите значения целочисленной переменной а после выполениния фрагмента алгоритма: a: =247; b: =(a div 100)*10+9; a; =(10*b-a) mod 10;

A=247 b=29 a=43mod10  a=3

Прежде чем начать рисовать взаимопересекающиеся множества общих друзей, я заглянул в словарь иностранных слов, вошедших в состав языка.- чудинов а.н., 1910., и нашел толкование слова «минимальный» - (от лат. minimi — малейший). наименьшая из рассматриваемых величин.      исходя из этого определения и логики, у трёх этих пользователей обязательно найдётся хотя бы 1 (один) общий друг. это и есть ответ на поставленный вопрос: минимальное количество пользователей соцсети, которые дружат и с павлом, и с виталием, и с андреем — один.

Var l, s, v, symbol: string; p, so, vc: real; r, h: integer; begin  writeln('введите r'); readln(r); writeln('введите h'); readln(h);   l: = 'l';     // s: = 's';   // v: = 'v'; // можно конечно обойтись и без них writeln('введите символ'); readln(symbol);   if symbol = l then begin  p: = 2*pi*r;   writeln('длина окружности =  ',p); end;   if symbol = s then begin  so: = pi * sqr(r);   writeln('площадь круга  =  ',so);   end;   if symbol = v then begin  vc: = pi * sqr(r) * h;   writeln('объем цилиндра =  ',vc); end; readln; end;