Даётся 4 бита, это 2^4 = 16 вариантов (0..15)
ответ: 16
1)
const d=100;
var a:1..20 ;
begin
Write('Введите кол-во долларов: '); readln(a);
Writeln('Кол-во рублей: ', a*d:0:2);
end.
2)
var a:1..20 ;
d:real;
begin
Write('Введите кол-во долларов: '); readln(a);
Write('Введите курс доллара: '); readln(d);
Writeln('Кол-во рублей: ', a*d:0:2);
end.
Задача сделана на языке паскаль, при помощи
PaskalPlus<span>
Оформление сделана как для студенческой задачи
<span>Если есть вопросы пиши в личку</span></span>
program HelloWorld;
var a: array of integer;
var N, min, max, i, variable:integer;
begin
min := 32767;
max := 0;
readln(N);
for i := 0 to N do begin
readln(variable);
if (variable > 0) and (variable mod 2 = 0) and (variable > max) then
max := variable;
if (variable > 0) and (variable mod 2 = 0) and (variable < min) then
min := variable;
end;
if (max <> 0) and (min <> 32767) then
writeln(min, ' ', max)
else
writeln(-1);
end.
Вот так правильно и тебе там нужно объявить M_PI
#include <iostream>#include <cmath>using namespace std;int main(){ int x; float A; cout<<"Введите х="; cin>>x; if (x >= M_PI){ A=0; cout<<"y=0"; } else if(M_PI>x && x>=0) { A=sin(x); cout<<"y=sin(x)"; } else if (0>x && x>=-2){ A=0; cout<<"y="; } else if (x<=-2) { A = pow((x+2),2); cout <<"y="; }
return 0;}