PascalABC.Net
1)
var
i,s,p : integer;
begin
s := 0;
p := 1;
for i := 3 to 18 do
if (i-2) mod 3 = 0 then
begin
s := s + i;
p := p * i;
end;
writeln ('s=',s);
writeln ('p=',p);<span>
end.
2)
Программа не зачисляет процент в первый год, если нужно, чтобы зачислила, то поменяй местами строки вывода и присвоения внутри цикла
var
i : integer;
s : real;
begin
s := 10000;
for i := 2010 to 2015 do
begin
writeln (i,'-',s);
s := s * 1.1;
end;<span>
end.</span></span>
Паскаль -- команда val. Синтаксис можно почитать где-то на форумах.
Если нужны другие языки -- какие?
<u>Условный оператор IF
</u>if (a>10) then writeln(a); // Если параметр а больше 10, то его вывести
<u />
if (a >20) then writeln(a)
else writeln('нет'); // Если а больше 20, то вывести этот параметр, если это не так - то написать слово НЕТ
Микрофончик для записи
Колоночки чтобы слушать
Наушнички тоже
Звуковая карта для качества звука, или точно отображения графиков сигнала, как цифрового так и аналогового.
Остальное по желанию ;)