//1
//PascalABC.Net 3.2
begin
write ('Стоимость покупки: ',
readreal('Цена 1 кг конфет(руб) : ')*readreal('Кол-во кг: ') +
readreal('Цена 1 кг печенья(руб): ')*readreal('Кол-во кг: ') +
readreal('Цена 1 кг яблок(руб): ')*readreal('Кол-во кг: '))
end.
//2
//MV C++ 10
#include <iostream>
using namespace std;
int main ()
{
int a, d, n;
cin >>a>>d>>n;
cout<<(2*a+(n-1)*d)*n/2;
return 0;
}
//3
#Python 3
a = int(input())
a2 = a*a
a4 = a2*a2
a8 = a4*a4
a16 = a8*a8
a20 = a16*a4
print(a4 )
print(a20)
Перо опустить
1 вправо
1 вниз
3 вправо
1 вниз
1 вправо
2 вниз
2 вправо
1 вниз
1 вправо
1 вниз
3 вправо
Перо поднять
Var x,y,f,z,a:real;
begin
write('Введите x,z: ');
readln(x,z);
if x>13 then f:=-3/(x+1)
else f:=-(x*x*x)+9;
if x<1 then y:=x*x
else
if x>1 then y:=x*x*x
else y:=x;
if x>z then a:=y*z*z/(3+power(2,3/5))
else a:=2*cos(x+z);
writeln('F(x)=',f);
writeln('Y=',y);
writeln('A=',a);
<span>end.
Если функции power нет, то вместо
</span>if x>z then a:=y*z*z/(3+power(2,3/5))
напечатать
if x>z then a:=y*z*z/(3+exp(3/5*ln(2))
С помощью компьютера модно найти информацию иди видео урок, что очень полезно в век новых технологий и для учебы