Ответ:
программа Paint. Эта программа очень нужна была обществу, даже сейчас она остаётся незаменимой. На Paint можно рисовать, писать, составлять что либо и просто развлекаться.
Var i,k,s:integer;
begin
writeln ('Введи 10 чисел');
for i:=1 to 10 do
begin
readln (k);
if k<0 then s:=s+k;
end;
writeln (s);
end.
<span> var
a,b: integer;
begin
write('введите 1-е число: ');
readln(a);
write('введите 2-у число: ');
readln(b);
writeln('сумма ',a,' и ',b,' = ',a+b);
writeln('разность ',a,' и ',b,' = ',a-b);
writeln('произведение ',a,' и ',b,' = ',a*b);
writeln('частное ',a,' и ',b,' = ',(a/b):5:2);
readln;
end.</span>
Январь принадлежит материнскому каталогу Зима, если следовать из условия. Таким образом, полное имя файла будет таким: <span>D:\2013\Зима\Январь\Вьюга.doc</span>
#include <stdio.h>
int main () {
double q, t;
int i, n;
printf ("Q, T, N? "); scanf ("%lf %lf %d", &q, &t, &n);
i = 1;
while (i <= n) {
q -= t;
printf ("N = %d, Q = %lf\n", i, q);
i++;
}
return 0;
<span>}</span>