4 года назад

Срочно!!!помогите пожалуйста даю 30 баллов задание 8 и 7

Знания

Информатика

1 ответ:

Ekaterina666664 года назад

0 0

//PascalABC

7)а) if (x > y) then z := x + y

else z := y - x;

б)при x = 5 и y = -6 (x > y)

z = x + y = -1

8) if (num1 < num2) then num1 := num1 + num2

else num1 := num1 - num2;

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

Запиши правильный ответ. Разрешение экрана монитора 3840×2400 означает, что изображение на его экране будет состоять из строк.

a6pa [4]

" 2457600 пикселей =

мегапикселей. "

1 мегапиксель = 1 000 000 пикселей

2 457 600 пикселей = 2,4576 мегапикселей

Логотип компании для публикации на сайте - RGB

CMYK используют для печати визиток и подобного

А HWER это придумано

Red Green Blue

Если я правильно понял, то в итоге получится Бирюзовый

по поводу картинки 49152

0 0

4 года назад

ОЧЕНЬ СРОЧНО !!! НУЖНО РЕШЕНИЕ И ОТВЕТ !!!

GavrilovaVasilisa [35]

4278 = <em>8 + 7 * 9 + 2 * 81 + 4 * 729</em> = <u>3149</u>

EF = <em>15 + 16 * 14</em> = <u>239</u>

011010112₃

+110111012₃

10011102₃

-01101112₃

1202220₃ = 1202220₃ = 1∙3⁶+2∙3⁵+0∙3⁴+2∙3³+2∙3²+2∙3¹+0∙3⁰ = 729 + 486 + 0 + 54 + 18 + 6 + 0 = <u>1293₁₀</u>

0 0

4 года назад

Срочно помогите!! Дан массив из 10ти целых чисел , введенных с клавиатуры. Найти и заменить все нулевые элементы на минимальный

PSIXOBOB [7]

Var
  i,min:integer;
  m:array[1..10] of integer;
begin
for i:=1 to 10 do
  begin
  readln(m[i]);
  if i=1 then min:=m[i];
  if m[i]<min then min:=m[i];
  end;
for i:=1 to 10 do
  begin
  if m[i]=0 then m[i]:=min;
  write(m[i],' ');
  end;
<span>end.</span>

0 0

4 года назад

Прочитать ещё 2 ответа

РЕБЯТКИ, ПОМОГИТЕ, ПОЖАЛУЙСТА!!! ОЧЕНЬ НУЖНО!!! Задача Pascal (во вложениях) данные типа spring. Пожалуйста, напишите задачу!

Алена2

var
Str1,c : string;
l,i : integer;
r : boolean;

begin
readln (Str1);
r := true;
i := 1;
l := Length (Str1);

While (r) and (i <= l) do
begin
c := copy (Str1,i,1);
  if (c <> '1') and (c <> '0') then
r := false;
i := i + 1;
end;

if r then
{writeln ('Ok')}
else
writeln ('Недопустимый символ!');
<span>end.</span>

0 0

4 года назад

Составить программу решения неравенства b^n=1,b>=1 для чисел из промежутка (1,100) n - натуральное число от пользователя. ПАС

Андрей я [7]

Если b^n=1, тогда b всегда равно 1(1 в любой степени равна 1), либо <span>ответ</span> 1, либо неправильно сформулировано задание. Поправьте если не так.

0 0

4 года назад