===== PascalABC.NET =====
-1-
begin
var x := ReadReal('Введите вклад?');
var n := ReadInteger('Введите срок?');
for var i := 1 to n do
begin
x *= 1.03;
Writeln(i, ' год - ', x:0:2, ' руб')
end
end.
-2-
begin
for var i := 1 to 10 do
Writeln('5*', i, ' = ', 5 * i)
end.
-3-
begin
var s := ReadSeqReal('Введите 5 любых чисел:', 5).Sum;
Println('Их сумма равна', s);
end.
Відповідь: 1) если m+3=n-1=0- , m=-3, n=1 x
2) m=-3, x -
3) если m=/-3, x=n-1/m+3
Пояснення:
вот
Х=18
у=8+24=32
х=3+3=6
с=6*632+6/6=5
1. Слева устройство вывода, снизу процессор.
2. Клавиатура, принтер.
3. Устройства ввода: 2,3 Вывода: 1,4
4. 1)Веб-камера 2)Проектор
(1 условие) не первая буква согласная = <em>первая буква гласная</em>
(2 условие) не последняя буква гласная = <em>последняя буква</em> <em>согласная</em>
1) Юлиан: первая буква <u>гласная</u> + последняя буква <u>согласная </u>
2) Константин: первая буква согласная + последняя буква согласная
3) Екатерина: первая буква гласная + последняя буква гласная
4) Светлана: первая буква гласная + последняя буква гласная
Союз "И" означает, что в правильном ответе должны соблюдаться оба условия
Ответ: 1