//Pascal
var N: byte;
begin
write('Введите двузначное число = '); readln(N);
writeln(N mod 10, N div 10);
readln;
end.
От хаоса к порядку: от поднесения магнита к железным опилкам. Опилки из хаоса соединяются в одно целое.
от порядка к хаосу: листья лежали в одной куче, ветер подул - они разлетелись.
Если,конечно, вам нужны примеры из жизни-вот они)
/*VS C++*/
#include <iostream>
#include <time.h>
using namespace std;
int main() {
int T[255][255];
int N, sum, mult;
cout << "Vvedite N = "; cin >> N;
cout << "***Random matrix***" << endl;
srand(time(NULL));
//Генерация массива
for (int i = 0; i < N; i++) {
for (int j = 0; j < N; j++) {
T[i][j] = rand() % 41 + (-20);
printf("%4.0d ", T[i][j]);
}
cout << endl;
}
//Сумма отрицательных над главной
sum = 0;
for (int i = 1; i < N; i++) {
for (int j = 0; j < N; j++){
if (j == i - 1) {
if (T[i][j] < 0){
sum = sum + T[i][j];
}
}
}
}
cout << "Summa = " << sum << endl;
//Произведение ненулевых под главной
mult = 1;
for (int i = 0; i < N; i++) {
for (int j = 1; j < N; j++) {
if (j == i + 1) {
if (T[i, j] != 0) {
mult = mult * T[i][j];
}
}
}
}
cout << "Proizvedenie = " << mult << endl;
system("pause");
return 0;
}
Объявление
Только сегодня действует экспресс скидка на все товары для дома
приобретайте и не пожалеете!
По качественным и низким ценам
Вещи самых известных брендов Италии, России,Франции
Заходите сейчас и получите подарок и скидку!
Ул Пирогова 14
(Можно так)
Отв: 135000 мегабайт
так как в 1 часе 3600 сек.
а в 1 сек. 25 кадров
