1)
var
s : real;
i, n : integer;
begin
s := 0;
read (n);
for i := 1 to n do s := s + 1 / i;
writeln (s);
end.
2)
var
a, i : integer;
begin
a := 1;
for i := 1 to 8 do
begin
a := a * 2;
writeln ('Через ', i * 3, 'часов будет ', a, ' амеб');
end;
end.
3)
var
n, i : integer;
x, s : real;
begin
s := 0;
read (n, x);
for i := 1 to n do
s := s + sin (i * x);
writeln (s);
end.
4)
var
n, a, r, i : integer;
begin
r := 1;
read (a, n);
for i := 1 to n do r := r * a;
writeln (r);
end.
var b,v,d,g,d1,d2:real;
begin
writeln('Б руб: ');
readln(b);
writeln('В руб: ');
readln(v);
writeln('Д руб: ');
readln(d);
writeln('Г руб: ');
readln(g);
if (3*b + 6*v) > (5*d + 4*g) then begin
writeln('1 девочка заплатила больше');
d1:=3*b+6*v;
d2:=5*d+4*g;
end
else
if (5*d + 4*g) > (3*b + 6*v) then begin
writeln('2 девочка заплатила больше');
d1:=3*b+6*v;
d2:=5*d+4*g;
end
else if (5*d + 4*g) = (3*b + 6*v) then begin
d1:=3*b+6*v;
d2:=5*d+4*g;
writeln('девочки заплатили одинаково');
end;
writeln;
writeln('1 девочка: ',d1,' руб');
writeln('2 девочка: ',d2,' руб');
end.
#include <stdio.h>#include <stdlib.h>#include <conio.h>#include <locale.h>
int main(){ setlocale(LC_ALL,"rus"); int w,r,g,y,b,i; int rat,bull,tiger,rabbit,dragon,snake,horse,goat,monkey,cock,dog,pig; int start=1984,end=start+60; printf("Начало цикла =%d\nКонец цикла =%d\n",start,end); if (start<=end) { w=start+12; printf("Год =%d -белый год\n",w); g=w+12; printf("Год =%d -зеленый год\n",g); r=g+12; printf("Год =%d -красный год\n",r); b=r+12; printf("Год =%d -черный год\n",b); y=b+12; printf("Год =%d -желтый год\n",y); } else { } printf("Это конец каждого 12 летнего цикла\n"); printf(" \n"); printf("Выберите год который вам нужен! 1-белый,2-зеленый,2-красный,4-черный,5-желтый,0-для выхода\n",i); scanf("%d",&i); if (i==1) { printf("1984=крыса\n1985=бык\n1986=тигр\n1987=кролик\n1988=Дракон\n1989=змея\n1990=Лошадь\n1991=козел\n1992=обезьяна\n1993=петух\n1994=собака\n1995=свинья\n"); } else { if (i==2) { printf("1996=крыса\n1997=бык\n1998=тигр\n1999=кролик\n2000=Дракон\n2001=змея\n2002=Лошадь\n2003=козел\n2004=обезьяна\n2005=петух\n2006=собака\n2007=свинья\n"); }
else {
if(i==3) { printf("2008=крыса\n2009=бык\n2010=тигр\n2011=кролик\n2012=Дракон\n2013=змея\n2014=Лошадь\n2015=козел\n2016=обезьяна\n2017=петух\n2018=собака\n2019=свинья\n"); } else {
if (i==4) { printf("2020=крыса\n2021=бык\n2022=тигр\n2023=кролик\n2024=Дракон\n2025=змея\n2026=Лошадь\n2027=козел\n2028=обезьяна\n2029=петух\n2030=собака\n2031=свинья\n"); }
else { if (i==5) { printf("2033=крыса\n2034=бык\n2035=тигр\n2036=кролик\n2037=Дракон\n2038=змея\n2039=Лошадь\n2040=козел\n2041=обезьяна\n2042=петух\n2043=собака\n2044=свинья\n"); } else { if (i==0) { EXIT_FAILURE; } else { printf("Выбирайте из предоставленных цифр!Попробуйте перезапустить программу"); } } } } } }
getch(); return 0;}