Открой файл. Посчитай средние значения температуры, используя функцию =СРЗНАЧ(). Построй диаграмму со средними температурами. Какая диаграмма получилась? Ссылка на файл ОТВЕТИТЬ

1) М*(Д→В), где М - поеду в Москву, Д - встречу там друзей, В - интересно проведём время.

2) (С→Л)+(П→К), где С - солнечная погода, Л - ребята пойдут в лес, П - пасмурная погода, К - ребята пойдут в кино.

3) ¬(B→(C→Д), где В - дует ветер С - солнце светит Д - нет дождя

4) И→О, где И - урок информатики будет интересным, О - никто из школьников не будет смотреть в окно.

Открой рисунок,там где отмечено красным,должны быть зайцы 

#include <iostream>

using namespace std;

int main()

{

   int a=5;

   double b=-3.5;

   double s=a+b;

   s = 2*s-b;

   cout << s;

   return 0;

}

Операция "не". Превращает все "1" в "0" и наоборот

var

   a, n : integer;

begin

   repeat

       read(a);

       if a div 7 = 0 then n += 1;

   until a = 0;

   writeln(n);

end.

N=2^i

Находим i:

64=2^i => i = 6 бит

I=6*10*32*64=60*2^5*2^6=60*2^11 бит = 2^13*15бит=15Кбайт

петя беседует с колей:петя источник,коля приёмник 

вася читает интересную книгу :вася приёмник,книга источник

таня ищет в интернете фотографии с животными:таня приёмник,интернет источник

вова собираеться переходить перекрёсток,регулируемый милиционером:вова приёмник,милиционер источник

соня едет в автобуде до "Площади мира" в незнакомом городе:Соня приёмник,незнакомый город источник

a) var a,b,c,sr_arf: real;

begin

writeln('Введите значение a:');

readln(a);

writeln('Введите значение b:');

readln(b);

writeln('Введите значение c:');

readln(c);

sr_arf:=(a+b+c)/3;

writeln('Среднее арифметическое чисел = ',sr_arf);

end.

б) var a,b,s: real;

begin

a:=8;

b:=2.4;

s:=2*a-b;

writeln('s = ',s);

end.

если у тебя торрент, скачай другой репак, а если лицензия, тогда поставь сглаживание на 4x или 2x, короче графон понизь

//PascalABC.NET 3.4.2

Вариант 1 №2

begin

 ReadSeqInteger(ReadInteger()).Where(x -> (x mod 3 = 0) and (x mod 10 = 2)).Count.Print;

end.

Вариант 2 №2

begin

 var sr := ReadSeqIntegerWhile(x -> x <> 0).Where(x -> (x div 10 <> 0) and (x div 100 = 0));

 try

   sr.Average.Print;

 except

   write('NO');

   exit;

 end;

end.