1.
а=2*а-в=3*2-6=0
в=а+22=0+22=22
<u>Ответ- А=0 В=22</u>
2.
а=2*а-в=3*2-5=1
в= (-1)^2=1
<u>Ответ- А=1 В=1</u>
3.
с=а+в=3+6=9
а=2*в-с=6*2-9=3
в=а+с=3+9=12
<u>Ответ- А=3 В=12</u>
4.
y=x*x=2*2=4
y=y*y=4*4=16
x=y*x=16*2=32
s=x+y=32+16=48
<u>Ответ- x=32 y=16 s=48</u>
<em>После того как переменной присвоили новое значение считается переменная с этим значением, старое значение ни как не учитывается</em>
Класс '' виста ''' 'натура
Каждая из девочек говорит правду, но только об одном предположении из двух.
Оля: Химия 16.04
Вика: Физика 15.04
Таня: НЕ химия 09.04
От сюда выходит что Оля не может быть права на счет химии, так как Вика сказала что это была физика, а Таня сказала, что это НЕ химия. Получается, что Вика и Таня говорят правду на счет предмета, но ошиблись в дате. Выходит, что это была контрольная по физике и 16.04
Program pr;
uses crt;
Var mas:array[1..1000, 1..1000] of integer;
N,M,i,j,k:integer;
Begin
Writeln('Введите размер матрицы N*M');
Write('N = ');
readln(N);
Write('M = ');
readln(M);
if (M>1000) or (N>1000) or (M<1) or (N<1)
then
Writeln('Ошибка, указанные значения выходят за пределы матрицы') else
Begin
Writeln('Введите элементы матрицы');
k:=0;
for i:=1 to N do
for j:=1 to M do
Begin
readln(mas[i,j]);
if (mas[i,j] mod 2 = 0) then k:=k+1;
end;
Writeln();
Writeln('Исходная матрица');
for i:=1 to N do
Begin
for j:=1 to M do
Begin
Write(mas[i,j], ' ')
end;
Writeln();
end;
Writeln();
Writeln('Количество четных элементов = ',k);
end;
readln;
<span>end.</span>
var i, n: integer;
begin
read(n);
for i:=1 to 10 do
writeln(n,'*',i,'=',n*i);
end.