2. Определите значение переменной А после выполнения фрагмента алгоритма. Постройте таблицу пошагового выполнения алгоритма по образцу. Укажите вид цикла, который используется во фрагменте алгоритма.
var c, a: array[1..20] of integer; i: integer; begin write('Первый массив '); for i := 1 to 20 do begin c[i] := i * (-5); write(c[i], ' '); end; writeln; write('Преобразованный массив '); for i := 1 to 20 do begin a[i] := c[20 - i + 1]; write(a[i], ' '); end; end.
ИЛИ Программа не использующая два массива, а просто переворачивающая первый
var c: array[1..20] of integer; i: integer; begin write('Первый массив '); for i := 1 to 20 do begin c[i] := i * (-5); write(c[i], ' '); end; writeln; write('Преобразованный массив '); for i := 20 downto 1 do write(c[i], ' '); end.
/** libraries */
#include <iostream>
#include <cmath>
#include <vector>
#include <map>
#include <set>
#include <queue>
#include <stack>
#include <algorithm>
/** libraries */
using namespace std;
/** defines */
#define ll long long
#define ld long double
#define yes cout << "YES" << "\n"
#define no cout << "NO" << "\n"
/** defines */
signed main() {
ios_base::sync_with_stdio(false);
cin.tie(nullptr);
cout.tie(nullptr);
// problem 1 //
ll x;
cin >> x;
if(x > 0)
x *= 5;
else
x -= 10;
cout << x << "\n\n";
// problem 1 //
// problem 2 //
ll a[3];
for(ll i = 0; i < 3; i++)
cin >> a[i];
sort(a,a+3);
cout << a[0] + a[1] << "\n\n";
// problem 2 //
// problem 3 //
ll y;
cin >> y;
if(y > 0)
y++;
else
y -= 2;
cout << y << "\n\n";
// problem 3 //
// problem 4 //
ll b[3];
for(ll i = 0; i < 3; i++)
cin >> b[i];
sort(b,b+3);
cout << b[2] + b[1];
//problem 4 //
}
var
c, a: array[1..20] of integer;
i: integer;
begin
write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 1 to 20 do begin
a[i] := c[20 - i + 1];
write(a[i], ' ');
end;
end.
ИЛИ Программа не использующая два массива, а просто переворачивающая первый
var
c: array[1..20] of integer;
i: integer;
begin write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 20 downto 1 do write(c[i], ' ');
end.
Обе программы работают!