Составьте программу нахождения произведение 2 чисел( Паскаль) Помогите, пожалуйста.

Знания

Информатика

1 ответ:

Анна Анатольевна 113 года назад

0 0

// PascalABC.NET
// Версия 3.3.5 сборка 1662 (29.04.2018)

begin
Println('Результат =', ReadInteger * ReadInteger)
end.

<u>Пример:</u>
7 5
Результат = 35

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

подбери к каждому слову пару! Пожалуйста! !!

dimasss87 [7]

2-10
3-7
4-4
5-6
6-1
7-?
8-3
9-8
10-2
11-9

0 0

4 года назад

"проверьте свои знания " помогите пожалуйста

Анатолий Бегунцов

Незнаю просто одно слово НЕЗНАЮ

0 0

4 года назад

Даны два целых числа. Если они оба положительны, то большее из них заменить их средним арифметическим; если оба отрицательны, то

Натулька Жукова

Var
a, b: integer;

begin
readln(a, b);
if a * b < 0 then {если числа разных знаков}
    writeln(2 * a, ' ', 2 * b)
else if a > 0 then begin{иначе одного знака и больше нуля}
    if a > b then
      writeln((a + b) / 2, ' ', b)
    else
      writeln(a, ' ', (a + b) / 2)
end
else begin
    if a > b then
      writeln(a, ' ', -b)
    else
      writeln(-a, ' ', b)
end;
end.

0 0

4 года назад

Определите значение переменной a после выполнение данного алгоритма: b:=4 a:=-3 b:=7-2*a-b a:=b/3-a

ViK-E [146]

У меня 6 получилось)

0 0

4 года назад

Сколько файлов размером 1562 Kбайт поместится на контакт диске емкостью 650Мбайт

alen55

выразим размер файла в Мб: 1562/1024=1,525Мб

теперь узнаем сколько таких файлов поместится на компакт-диск

650/1,525=426 файлов это и есть ответ

0 0

4 года назад