Реши пример: Дана программа на языке программирования Паскаль для решения данного примера. Заполни пропуски. var z:real; begin (81+206)/(69+26) 81+206∗69 81+206/(69+26) writeln('z=',z:4:2); readln; end.
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.
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.
Обе программы работают!
C++
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "RUS");
// первая задача
int c;
cout << "Введите число c: ";
cin >> c;
if (c % 2 == 0)
{
cout << "YES" << endl;
}
else
{
cout << "NO"<< endl;
}
//вторая задача
int a, b;
cout << "Введите число а: ";
cin >> a;
cout << "Введите число b: ";
cin >> b;
if (a > b)
{
a = a * 2;
cout << a << endl;
}
else
{
b = b * 2;
cout << b << endl;
}
//третья задача
int d;
cout << "Введите число а: ";
cin >> d;
if (d % 2 == 0)
{
d = d / 2;
cout << d << endl;
}
else
{
cout << 0 << endl;
}
return 0;
}