Var
a,b,c,d:integer;
e : real;
begin
readln (a,b);
c := a + b;
d := a * b;
e := a / b;
writeln ('Сумма = ',c,' произведение = ',d, ', а частное = ',e);
end.
Одинизних, наверное 3д моделирование
А
б
в и всё а тактильную нет т к пощупать информацию мы не можем!)))
Входные данные:
В первой строке вводится целое положительное число
(
). Во второй строке через пробел вводится
чисел
(
).
Выходные данные:
В единственной строке выходного файла OUTPUT.TXT через пробел вывести все
элементов массива
, каждый из которых увеличен в 2 раза.
Пример ввода:
6
1 2 3 4 5 6
Пример вывода:
2 4 6 8 10 12
Писал на: PascalABC.Net v.3.2, сборка 1325 (19.10.2016)
Исходный код решения находится в приложении ниже. Открыть можно только в веб-версии.