с информатикой
Определить результат выполнения алгоритма при a=3 и b=12 ДА-направо, НЕТ- налево

7.5

Объяснение:

a > 0 true => c := (a+b)/2

(3+12)/2 = 7.5

где-то в начале ii тысячелетия до нашей эры предки финикийцев изобрели алфавит.

само слово "алфавит" восходит к названиям первых финикийских букв: альфа "алеф" (бык) и  бета "бет" (дом). финикийцы дали название каждой букве своего алфавита.

var n, i, k, a: integer;

begin readln(n); k : = 0; for i : = 1 to n do begin readln(a); if trunc(sqrt(a)) * trunc(sqrt(a)) = a then k : = k + 1; end; writeln(k); end.