4 года назад

Общие,единичные имена объектов. приведите примеры

1 ответ:

IgorPk4 года назад

0 0

Предмет:книга,наушники,газета,крючок,ручка,салфетка,зубная щетка
явление:гроза,гром,молния,дождь
процесс:рыбалка,охота, футбол

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

Всем привет! Помогите, пожалуйста, переписать программу с Python 3 на Pascal. В Python функция ceil(x) означает округление в бол

Advokat40

Ответ:

program abc;

var n,m,k,b:integer;

begin

readLn(n,m,k);

if k mod m <> 0 then b:=Trunc(k/m)+1 else b:=k div m;

if b mod 2<>0 then writeLn(b)

else if b>=n then writeLn(b-1);

if (b mod 2=0) and (b<>n) then writeLn(b+1);

end.

Объяснение:

0 0

4 года назад

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

a6pa [4]

" 2457600 пикселей =

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

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

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

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

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

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

Red Green Blue

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

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

0 0

4 года назад

Ребят, помогите пожалуйста)) 2. Написать программу на языке программирования Паскаль, вычисляющую гипотенузу и площадь прямоугол

Лобачевска [123]

Var a, b, c, s: real;
begin
  write('Введите a, b: '); readln(a, b);
  c := sqrt(a*a + b*b);
  s := (a * b) / 2;
  writeln('Гипотенуза: ', c, #10, 'Площадь: ', s);
end.

0 0

3 года назад

С помощью цикла while выведите в консоль поданный ниже треугольник: * * * * * * * * * *

VasFed06

Код написан на языке C++

0 0

4 года назад

Если число заканчивается на 2 или 3, то исходное число умножить на число десятков в нем, если число единиц от 7 до 9, то из числ

Janar95 [34]

Var
i, n, a, b,n1: integer;
begin
write('Введите число ');
Readln(n);
n1 := n;
a := n mod 10;
case a of
2, 3: n := n * ((n div 10) mod 10);
7, 8, 9: begin for i := 1 to length(inttostr(n)) do begin b := b + (n mod 10);n := n div 10; end;n := n1 - b; end;
1, 4, 5, 6, 0: n := n div 10;
End;
Write(n);
<span>end.</span>

0 0

4 года назад

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