//PascalGUI
var
a:integer;
begin
readln(a);
case a of
1:writeln('Понедельник');
2:writeln('Вторник');
3:writeln('Среда');
4:writeln('Четверг');
5:writeln('Пятница');
6:writeln('Суббота');
7:writeln('Воскресенье')
else writeln('Не день недели');
end;
end.
Пример ввода:
1
Пример вывода:
Понедельник
#include <bits/stdc++.h>
using namespace std;
int main() {
double sum = 0;
double n = 0;
while (true) {
int x;
cin >> x;
if (x == 0) break;
if (x % 6 == 0) {
++n;
sum += x;
}
}
if (n == 0) cout << "NO" << endl;
else cout << (sum / n) << endl;
return 0;
}
Реализация на Excel 2003
лист не защищен, осторожно, не повредить формулы.
Сами формулы отображаются в строке формул.
Свойства алгоритма:
1.Дискретность
2.Результативность
3.Массовость
4.Детерминированность
5.Выполнимость и понятность
6.Точность
7.Конечность
Ответ:
ок не буду))))))))))))))))))