Все категории

3 года назад

Кто отлично знает информатику! Помогите с 3 заданием

Знания

Информатика

1 ответ:

милагрос777 [434]3 года назад

0 0

B) E2 =C2*D2
C7 =СУММ(С1:С6)

Читайте также

Помогите пожалуйста. Спасибо!!!

TohaNeon

Маслов- химик
Павлов- баянист
Жирков- художник
Сидоров- писатель
1а2г3б4в

0 0

4 года назад

Информатика паскаль хелп ми

Сергей Валентинович1

Ответ:

program HelloWorld;

var t, y, a, b: real;

begin

a := -0.5;

b := 1;

writeln('Input t');

read(t);

if (t >= 1) and (t <= 2) then

y := a * (t * t) * Ln(t) ;

if t < 1 then

y := 1;

if t > 2 then

y := Exp(a * t) * Cos(b * t);

writeln(y);

end.

Объяснение:

0 0

2 года назад

Постройте таблицы истинности для следующих выражений а)¬(А∧В∨ ¬С)∨¬А∧В б)¬А∧В∨А∧¬С∨¬В∧С Пожалуйста с объяснением

julia lobanovo [159]

См. приложения.
Объяснения ясны из таблиц.

0 0

4 года назад

Составить программу, формирующую массив b[2],каждый элемент которого является максимальным из соответствующих элементов массивов

Awesome44442 [14]

Var
i:integer;
a,c:array[1..4]of integer;
b:array[1..2]of integer;
begin
write('Массив а: ');
for i:=1 to 4 do
begin
a[i]:=random(10);
if a[i]>b[1] then b[1]:=a[i];
c[i]:=random(10);
if c[i]>b[2] then b[2]:=c[i];
write(a[i],' ');
end;
writeln;
write('Массив c: ');
for i:=1 to 4 do write(c[i],' ');
writeln;
write('Массив b: ');
for i:=1 to 2 do write(b[i],' ');
<span>end.</span>

0 0

4 года назад

Получить квадратную матрицу порядка n: k 0 n-1 n n-2 n-1 n .... ..... .... 1 2 3...n Может кто знает как написать программу в Па

Максим02314

Const n=6;
var a:array[1..n,1..n] of integer;
i,j:integer;
begin
for i:=1 to n do
for j:=1 to i do a[i,j]:=n-i+j;
for i:=1 to n do
begin
for j:=1 to n do write(a[i,j]:3);
writeln;
end;
end.

Пример:
6 0 0 0 0 0
5 6 0 0 0 0
4 5 6 0 0 0
3 4 5 6 0 0
2 3 4 5 6 0
1 2 3 4 5 6

0 0

3 года назад