Вычислите значение логического выражения (1v0) & ¬(0& а)v¬(1v0)​

v=331+ 0,6*t

в зимний день- v=331+ 0.6*(-35)=310 м/с

в летний день-   v=331+ 0.6*30=349 м/с

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.

ну например

в первом столбике пишешь  числа попорядку

во втором столбике пишешь "=a1*a1" и протягиваешь вниз на всю таблицу

в третем пишешь "=a1*a2" и протягиваешь вниз на всю таблицу

в первом столбике у нас получается число

во втором  квадрат числа

в третем - куб числа

var  a, s: integer; // целочисленный тип данныхbeginwriteln('введите число: ');   readln(a); // вводим число (можно больше трех знаков)  while a < > 0 do  // пока остались цифры в числе   begin      s : = s + (a mod 10); // отбираем последнюю цифру числа и прибавляем к сумме      a : = a div 10; // стираем последнюю цифру числа  end;   writeln('сумма цифр = ', s) // выводим результатend.