1. Напишите наибольшее целое число х, для которого истинно высказывание: НЕ (х + 4) и НЕ (X >= 9).
2. Напишите наименьшее целое число, для которого истинно высказывание:
НЕ (Число < 100) и НЕ (Число нечетное)?
3. Напишите наименьшее натуральное треоначное число, для которого истинно высказывание:
НЕ (Число нечетное) и (Число кратно 3).
4. Напишите наименьшее число X, для которого истинно высказывание:
(X> 16) и НЕ (х нечётное).
5. Напишите наибольшее целое число х, для которого истинно высказывание:
НЕ (Х <= 14) и (X <18).
6. Напишите наименьшее целое число ж, для которого истинно высказывание
(X> 2) и НЕ (X > 13).
7. Напишите наибольшее целое число ж, для которого истинно высказывание:
НЕ (Х <6) и НЕ (X >= 11).
8. Напишите наименьшее целое число х, для которого истинно высказывание:
НЕ (x < 2) и (х четное).
9. Напишите наибольшее целое число х, для которого истинно высказывание:
(X >= 6) и НЕ (X> 12).
10. Напишите наибольшее целое число ж, для которого истинно высказывание:
НЕ (Х <3) и НЕ (X >= 7).
11. Напишите наибольшее целое число х, для которого истинно высказывание
НЕ (X нечётное) и НЕ (X >= 6).
12. Напишите наименьшее целое число х, для которого истинно высказывание:
НЕ (x < 2) и НЕ (X > 10).
13. Напишите наибольшее целое число х, для которого истинно высказывание:
НЕ (X четное) и НЕ (X >= 11).
14. Для какого целого числа Хложно высказывание:
(X> 3) или НЕ (X> 2).
15. Напишите число X, для которого истинно высказывание:
(x < 8) и НЕ (x < 7).
m=10;
n=6;
var
a:array[1..10,1..6] of integer;
i,j:integer;
begin
Writeln('Элементы массива');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=sqr(i)+sqr(j);
Write(a[i,j]:4)
end;
Writeln
end
end.
Тестовое решение:
Элементы массива
2 5 10 17 26 37
5 8 13 20 29 40
10 13 18 25 34 45
17 20 25 32 41 52
26 29 34 41 50 61
37 40 45 52 61 72
50 53 58 65 74 85
65 68 73 80 89 100
82 85 90 97 106 117
101 104 109 116 125 136
const
n = 10;
var
a: array[1..n] of integer;
i, t: integer;
begin
Randomize;
Writeln('Элементы массива');
for i := 1 to n do
begin
a[i] := Random(50);
Write(a[i]:3);
end;
Writeln;
t:=a[n];
for i:=n-1 downto 1 do a[i+1]:=a[i];
a[1]:=t;
Writeln('Результирующий массив');
for i := 1 to n do Write(a[i]:3);
Writeln
end.
Тестовое решение:
Элементы массива
13 43 26 31 1 21 12 0 33 25
Результирующий массив
25 13 43 26 31 1 21 12 0 33
#include <iostream>
#include <cmath>
using namespace std;
int function(float *pointer1, float *pointer2)
{
float ch1, ch2;
ch1 = powf(*pointer1, 2);
ch2 = powf(*pointer2, 2);
cout<<"Квадрат первого числа равен:"<<ch1<<endl;
cout<<"Квадрат второго числа равен:"<<ch2<<endl;
return(0);
}
int main()
{
setlocale(LC_ALL, "RUS");
float a, b;
float *pointer1;
float *pointer2;
cout<<"Введите первое число:";
cin>>a;
cout<<"Введите второе число:";
cin>>b;
pointer1 = &a;
pointer2 = &b;
function(&a,&b);
system("PAUSE");
}