Var a,s,k:integer;beginwrite('введите число: ');readln(a);while a<>0 do begink:=a mod 10;s:=s+k;a:=a div 10;end;writeln('сумма цифр равна ',s);end.
А зачем массив импортировать, когда можно подсчитать сумму по ячейкам, через макрос?
Sub Макрос1()
'
' Макрос1 Макрос
'
'
s = 0
MsgBox "Выбраны ячейки: " & ActiveWindow.RangeSelection.Address
For n = 1 To Selection.Rows.Count
s = s + Selection.Cells(n, n)
Next n
MsgBox "сумма диагональных элементов: " & s
<span>End Sub
На самом листе Excel заводим кнопку CommandButton1 и даем название кнопке "Подсчет"
Набираем процедуру CommandButton1_Click
</span>Private Sub CommandButton1_Click()
Макрос1
<span>End Sub
</span>
После выделения диапазона ячеек мышью нажимаем кнопку "Подсчет" и получаем результат.
Решение в прикрепленном файле.
#include <iostream>
#include <conio.h>
float mathFunc(float x) {
if (x < 0)
return 2 * x;
else if (x > 0)
return x * x + 10;
return 0;
}
int main() {
setlocale(LC_ALL, "");
std::cout << mathFunc(-1) << " " << mathFunc(0) << " " << mathFunc(1);//проверка
_getch();
return 0;
<span>}
//1
</span>#include <iostream>
#include <conio.h>
int main() {
setlocale(LC_ALL, "");
int year;
while (true) {
system("cls");
std::cout << "Введите год своего рождения:";
std::cin >> year;//год может быть отрицательным => до н.э.
year = 2017 - year;
printf("Вам %d лет,", year);
if (year < 45)
printf("вы молоды");
else if (year < 60)
printf("вы среднего возраста");
else if (year < 75)
printf("вы пожилого возраста");
else if (year > 90)
printf("вы старческого возраста");
<span>_getch();
</span><span>return 0;
}
//2
</span>
Using namespace std;
int main ()
{
SetConsoleOutputCP(1251);
cout<<"Введите три числа"<<endl;
int a,b,c;
cin>>a>>b>>c;
if ( (a<0) && (b<0) && (c<0))
{
cout<<"неотрицательных чисел нет"<<endl;
system("pause");
return 0; // дальше не выполняем, чтобы не тратить силы впустую
}
if (a>0)
cout<<a*a<<endl;
if (b>0)
cout<<b*b<<endl;
if (c>0)
cout<<c*c<<endl;
system("pause");
return 0;
}
