Var
i, sum : integer;
begin
sum := 0;
for i := 1 to 100 do sum := sum + i;
writeln (sum);
end.
1001011
более 20 символов(
В первом 4 во 2 -4 вроде так
Используя мышь, мы нажимаем на Пуск и открываем меню компьютера. Меню - это прямоугольная область, выскакивающая в левой нижней части рабочего экрана. Затем пользователь, щелкает на левую кнопку мыши и выбирает нужный пункт меню из предложенных вариантов. Тем самым выполняет управление компьютером, при этом выбирая нужные программы, документы, приложения, и внося в них коррективы. В меню отражаются все программы, сохраненные на персональный компьютер.
/*VS C++*/
#include <iostream>
#include <math.h>
using namespace std;
int main() {
float x, y, h;
cout << "Vvedite x = "; cin >> x;
cout << "Vvedite y = "; cin >> y;
if (x < y) h = atan(x + fabs(y));
if (x > y) h = atan(fabs(x) + y);
if (x == y) h = pow((x + y), 2);
cout << "h = " << h << endl;
system("pause");
return 0;
}