Есть ответ 👍

50 баллов!!!!
1. Пользователь вводит два числа. Найдите сумму и произведение данных чисел.
2. Вычислите значение выражения (a+4b)(a−3b)+а²
3. Дано число. Если оно больше 3, то увеличить число на 10, иначе уменьшить на 10.
4. Дано два числа. Вывести yes, если они отличаются на 100, иначе вывести No.

284
287
Посмотреть ответы 2

Ответы на вопрос:


ответ:1)var a,b,c,d;integer;  

begin

readln(a,b);

c:=a+b;

d:=a*b;

writeln(‘сумма’,c);

writeln(‘произведение’,d);

end.

titsdeil
4,6(81 оценок)

Const   n=10;   m=5; var   i,j,s: integer;   a: array[1..m,1..n]of integer;   b: array[1..n]of integer; begin writeln('массив а: '); for i: =1 to m do   begin   for j: =1 to n do     begin     a[i,j]: =random(10);     write(a[i,j]: 3);     end;   writeln;   end; for j: =1 to n do   begin   s: =0;   for i: =1 to m do  s: =s+a[i,j];   b[j]: =s;   end; writeln('массив в: '); for i: =1 to n do  write(b[i]: 3);   end.

Популярно: Информатика