Const
m=5;
n=3;
var
i,j,k:integer;
a:array[1..m,1..n] of integer;
begin
Randomize;
Writeln('Исходный массив');
k:=0;
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=Random(999)+1;
Write(a[i,j]:4);
if (a[i,j] mod 8=0) and (a[i,j] mod 10=4) then Inc(k);
end;
Writeln
end;
if k>0 then begin
Writeln('Искомые элементы');
for i:=1 to m do
for j:=1 to n do
if (a[i,j] mod 8=0) and (a[i,j] mod 4=10) then Write(a[i,j],' ')
end
else
Writeln('Нет элементов, кратных 8 и оканчивающихся на 4')
end.
Пример работы программы
Исходный массив
424 672 826
546 587 413
507 211 884
252 781 518
750 656 359
Искомые элементы
424
var
i, p,
w:real;
begin
writeln('Введите
зарплату Иванова');
readln(i);
writeln('Введите
зарплату Петрова');
readln(p);
if i>p
then
writeln
('Иванов заработал больше Петрова') else
writeln
('Петров заработал больше Иванова');
w:=(i+p)/2;
writeln
('Средняя зарплата мальчиков ', w,
' руб.');
<span>end.</span>
1.Мышкой надавить на пиктограмму следующего файла
2. Клавишами управления курсором перемещать для выделения пиктограммы следующего файла.
#include <stdio.h>#include <math.h>using namespace std;int main() { size_t n = 2; // Уадяемая цифра int number = 2346224; // Задавай число printf("Входное число: %d\n", number); int sig = number >= 0, temp = number; number = 0; size_t i = 0; while (temp) { int k = temp % 10; if (n != k) { number += (k)* pow(10, i); i++; } temp /= 10; } number *= sig; printf("Результат: %d\n", number); system("pause"); return 0;}
<span>Число в шестнадцатиричной системе = 0xB11924E1
</span><span>Число в десятичной системе = </span>2971215073