271₈ = 2*8²+7*8+1 = 128+56+1 = 185₁₀
11110100₂ = 1*2⁷+1*2⁶+1*2⁵+1*2⁴+1*2² = 128+64+32+16+4 = 244₁₀
185₁₀+244₁₀=429₁₀
Заполнение с клавиатуры:
Var
A:array[1..10000] of integer;
i,n:integer;
S:real;
Begin
Write('n = ');ReadLn(n);
Write('Введите a1..a',n,': ');
S:=0;
For i:= 1 to N do
Begin
Read(A[i]);
if (A[i] mod 4 = 0) then S:=S+A[i];
End;
WriteLn('S = ',S);
End.
Заполнение случайными числами:
Var
A:array[1..10000] of integer;
i,n:integer;
S:real;
Begin
Randomize;
Write('n = ');
ReadLn(n);
Write('a1..a',n,': ');
S:=0;
For i:= 1 to N do
Begin
A[i]:=random(2*N+1)-N;
Write(A[i],' ');
if (A[i] mod 4 = 0) then S:=S+A[i];
End;
WriteLn;
WriteLn('S = ',S);
End.
#include <iostream>
#include <cmath>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
int
WidthPage,
HeightPage,
SumSizeFields,
SizeField,
WidthCharacter,
HeightCharacter,
CountCharacters;
float
CountPages,
SizePage,
AreaCharacter;
cout << "Введите ширину страницы: ";
cin >> WidthPage;
cout << "Введите высоту страницы: ";
cin >> HeightPage;
SizePage = WidthPage * HeightPage;
cout << "Ввод ширины полей производится по очереди через Enter. Если поле отстутствует, введите 0.\n";
int i = 0;
SumSizeFields = 0;
for (i = 0; i < 4; i++)
{
cout << "Введите ширину " << i+1 << " поля: ";
cin >> SizeField;
SumSizeFields = SumSizeFields + SizeField;
}
SizePage = SizePage - SumSizeFields;
cout << "======================\n";
cout << "Введите ширину символа: ";
cin >> WidthCharacter;
cout << "Введите высоту символа: ";
cin >> HeightCharacter;
cout << "Введите количество символов: ";
cin >> CountCharacters;
AreaCharacter = (WidthCharacter * HeightCharacter) * CountCharacters;
CountPages = AreaCharacter / SizePage;
cout << "Количество страниц в книге = " << ceil(CountPages) << endl;
system("pause");
return 0;
}
Так на пример чтоб совершить какой либо алгоритм ты его предстовояешь сегодня сделал много алгоритмов например с утра что ты делаешь
1. открываешь глоза
2.встаешь
3.одеваешь тапочки
4.встоешь с кровати
5.запровляешь кровать
6.идёшь в вану
7.принимаешь душ
8.чистиш зубы
9.вытираешься
10.одеваешься
11.идеш на кухню
12.береш чайник
13.идёшь к воде
14.включаешь воду
15.подстовляешь чайник
16.ждешь пока набирается вода
17.выключаешь воду
18.идеш к плите
19. ставишь чайник
20.зажигаешь спичку
21.включаешь газ
22.подносишь спичку
23.ждешь воду
и т.д
)
Var a,b,c:real;
begin
write('Введите стороны треугольника а,b и c: ');
readln(a,b,c);
if (a=b) and(b=c) then
writeln('Треугольник равносторонний')
else writeln('Треугольник неравносторонний');
<span>end.</span>
