Поля для ввода, иконки в средах программирования, кнопки и т.д
В них вводится текст. А также с помощью диалоговых окон можно осуществлять общение юзера и системы.
Запишем представление восьмеричного числа в двоичной системе, группируя двоичные разряда по три (два в третьей степени равно 8)
111 100 000 000(2) = 7400(8).
Дана сторона квадрата a. Найти его периметр P = 4·a.
<span>Код C++<span>1
2
3
4
5
6
7
8
9
10
11
<span>#include <iostream>
using namespace std;
int main()
{
int a=100;
int P=4*a;
cout<<"P="<<P<<endl;
return 0<span>;
</span></span></span></span><span>Учитывая то, что у тебя программа закроется мгновенно, перед return 0; поставь system("pause");</span>
Var
a:array[1..2,1..3] of integer;
i,t,j:integer;
begin
writeln('До:');
for i:=1 to 2 do
begin
for j:=1 to 3 do
begin
a[i,j]:=random(10);
write(a[i,j],' ');
end;
writeln;
end;
for j:=1 to 3 do
begin
t:=a[1,j];
a[1,j]:=a[2,j];
a[2,j]:=t;
end;
writeln('После:');
for i:=1 to 2 do
begin
for j:=1 to 3 do
write(a[i,j],' ');
writeln;
end;end.
<span>ПРИМЕР РАБОТЫ:
До:
5 5 2
8 6 2
После:
8 6 2
5 5 2
</span>
Var
s,g:string;
sum:integer;
begin
g:='бвгджзйклмнпрстфхцчшщБВГДЖЗЙКЛМНПРСТФХЦЧШЩ';
read(s);
sum:=0;
for var i:=1 to length(s) do
if (pos(s[i],g)>0) then sum:= sum+i;
writeln(sum);
end.
<span>//ABC Pascal
</span>