Найдите и выведите на экран все двузначные числа, сумма цифр которыx не меняется при умножении на 2. (например, 27 и 27*2=54, сумма цифр чисел 27 и 54 равна 9) язык программирования паскаль авс
Var i,tmp,s1,s2:integer; begin for i:=10 to 50 do begin tmp:=i; while tmp <> 0 do begin s1+=tmp mod 10; tmp:=tmp div 10; end; tmp:=i*2; while tmp <> 0 do begin s2+=tmp mod 10; tmp:=tmp div 10; end; if (s1=s2) then write(i,' '); s1:=0; s2:=0; end; end.
#include <iostream> #include <cstdlib> #include <ctime> int main() { using namespace std; cout << "Enter size of array: "; int N; cin >> N; int * ARR = new int[N]; srand(time(0)); int i; for (i = 0; i < N; ++i) ARR[i] = rand() % 100 + 1;
cout << "Here is an original array:\n"; for (i = 0; i < N; ++i) cout << ARR[i] << " "; cout << endl;
int temp = ARR[N - 1]; for (i = N - 1; i > 0; --i) ARR[i] = ARR[i - 1]; ARR[0] = temp;
cout << "\nHere is a new array:\n"; for (i = 0; i < N; ++i) cout << ARR[i] << " "; cout << endl;
Использовать источники открытого огня (спички, зажигаприносить на уроки легковоспламеняющиеся вещества (лаки, краски, порох и т.п.); лки, петарды и др.); работать с электроприборами, имеющими повреждения корпуса или изоляции соединительных проводов; вставлять в отверстие приборов посторонние предметы; приносить и самовольно подключать какое-либо оборудование; производить самовольное переключение разъёмов оборудования; вставлять в отверстие приборов посторонние предметы; работать с электроприборами, имеющими повреждения корпуса или изоляции соединительных проводов;
begin
for i:=10 to 50 do begin
tmp:=i;
while tmp <> 0 do begin
s1+=tmp mod 10;
tmp:=tmp div 10;
end;
tmp:=i*2;
while tmp <> 0 do begin
s2+=tmp mod 10;
tmp:=tmp div 10;
end;
if (s1=s2) then write(i,' ');
s1:=0;
s2:=0;
end;
end.