на си(с++)
#include<iostream.h>
void main(){
int a;
int x;
cin>>x;//число на которое должно закончитьс
cin>>a;//число которое вводишь
int b,c,d;
b=a%1000;//остаток от деления на 1000
d=b%100;//остаток от остатка деления на 100
c=d%10;//само число
if (c==x) cout<<"Верно";else cout<<"Не верно";
}
если на паскале тольок вместо % ставите mod и вместо cout write
и в скобках а так в принципе все
Ответ Б) 2,1,4,3.
Сначала были ламповые, затем когда ламповыми ЭВМ рынок был переполнен стали производиться транзисторные ЭВМ, затем были ЭВМ БИС, и потом ЭВМ СБИС.
Var U: array [1..15] of integer;
i, min :integer;
begin
for i := 1 to 15 do
read(U[i]);
min := U[1];
for i := 1 to 15 do
if (U[i] < min) then begin
min := U[i];
end;
for i := 1 to 15 do
if (U[i] = min) then write(i,' ');
end.
01000100 01110101 01100010 01101001 01101110 01110011 01101011 01100001 01101001 01100001
#include <iostream>
#include <random>
#include <ctime>
using namespace std;
mt19937 gen(time(0));
uniform_int_distribution<> uid(0, 19);
void replace(int *a, int n, int k)
{
int last = a[n];
for (int i = n - 1; i >= k; i--) {
a[i + 1] = a[i];
}
a[k] = last;
}
int main()
{
int n = 0, k = 0;
cin >> n;
int *a = new int[n];
if (n <= 100) {
for (int i = 0; i <= n; i++) {
a[i] = uid(gen); cout << a[i] << " ";
}
cout << endl; cin >> k;
if (k <= n) {
replace(a, n, k - 1);
for (int i = 0; i <= n; i++) {
cout << a[i] << " "; }
} else {
cout << "Error" << endl;
}
} else {
cout << "Error!" << endl;
}
delete[] a;
return 0;
}