Изучайте языки программирования - это интересно.
var x,y,z,a:real;
begin
writeln('Введите значения X,Y,Z:');
readln(x,y,z);
a:=(x+y-z)/(x*2+2);
writeln('Ответ:',a:4:2);
end.
var x,y,z,a:real;
begin
writeln('Введите значения X,Y,Z:');
readln(x,y,z);
<span>a:=(5+2*x-z)/(3+y*2);
</span>writeln('Ответ:',a:4:2);
end.
i - 8 бит
K = 64*40*40
I - ?
I = K*i = 64*40*40*8 бит = 64*40*40*8/8 байт = 64*40*40 байт = 64*40*40/1024 Кбайт = 100 Кбайт
Данная программа написана для Pascal:
var s:string;
i,k:integer;
begin
writeln('введите текст');
readln(s);
k:=0;
for i:=1 to length(s) do
if s[i]='к' then k:=k+1;
if k=0 then writeln('ни разу') else writeln(k);
end.
#include <iostream>
#include <string>
#include "Windows.h"
using namespace std;
void main()
{
<span> SetConsoleOutputCP(1251);
</span><span> string nazv[] = { "большой", "указательный", "средний", "безымянный", "мизинец" };</span><span>
int number = 0;
</span><span> cout << "Введите номер пальца:"; cin >> number;
</span><span> if (number <= 0 || number > 5)
</span><span> cout << "Ввели неверный номер." << endl;
</span><span> else
</span><span> cout << nazv[number - 1] << endl;
</span><span>}</span>