6 целых 1/4 - 3 целых 2/5.
находим наименьший общий знаменатель и домножаем.
получается: 6 целых 5/20 - 3 целых 8/20.
так как в первой дроби числитель меньше второй дроби, переводим в неправильную дробь.
5 целых 25/20 - 3 целых 8/20 = 2 целых 17/20.
Ответ. 2 целых 17/20
Как-то глуповато получилось, но, как говорится, каков вопрос - таков ответ:
=IF(OR(ROW(A1)=1;AND(ROW(A1)=2;<span>COLUMN(A1)=2));1;0)
</span>
В Excel это будет так:
=ЕСЛИ(ИЛИ(СТРОКА(A1)=1;И(СТРОКА(A1)=2;СТОЛБЕЦ(A1)=2));1;0)
Так как A больше B, то подставляем в первую, после then ) c:=8+2
C:=10 , если бы условие не выполнялось, подставляли бы в то, что после else(иначе)
Program Pr1;
uses crt;
var fl1,fl2:text;
i,n,v,a,b:integer;
Begin
clrscr;
assign(fl1,'input.txt');
assign(fl2,'output.txt');
reset(fl1);
readln(fl1,n);
v:=0;
for i:=1 to 1000000 do begin
if i>=10 then begin
a:=i div 10;
b:=i mod 10;
if (a mod 2<>0) and (b mod 2<>0) then v:=v+1;
end
else if i mod 2<>0 then v:=v+1;
if v=n then break;
end;
rewrite(fl2);
writeln(fl2,v);
close(fl1);
close(fl2);
end.
Все работает я проверил
Ты объявила массив от 1 до 10, а в конце в цикле пытаешься обратиться к элементу с индексом 0!
(for i:=0 to m do
<span>begin for j:=0 to n do)
Ну и куча мелких недочетов еще тут есть
const
n=5;
m=6;
var
a:array[1..n,1..m] of integer;
i,j: integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(10);
write(a[i,j]:4);
end;
writeln;
end;
writeln('Измененный массив:');
for i:=1 to n do
begin
for j:=1 to m do
begin
if a[i,j]=0 then a[i,j]:=i+j;
write(a[i,j]:4);
end;
writeln;
end;
<span>end.</span></span>