Program procenti;
Var Summ:real; k:integer;
begin
writeln('введите процент');
Readln(k);
Summ:=387*(0.2*k);
Writeln('Summ=', summ)
end.
Целевой яп - C#. Реализован ввод с клавиатуры и проверка на корретность ввода. Пример работы программы приведен на рисунке 1. Код ниже.
using System;
namespace FindPairs
{
class Program
{
static void Main(string[] args)
{
Console.Write("Введите трехзначное число: ");
string input = Console.ReadLine();
int number = 0;
if(input.Length != 3 || !int.TryParse(input, out number))
{
Console.WriteLine("Неверный ввод. Экстренное завершение!");
return;
}
Console.WriteLine("Число, полученное при перестановке первой и второй цифры: {1}{0}{2}", input[0],input[1],input[2]);
}
}
}
Program p1;
uses crt;
var a,b,i:integer;
begin
for i:=15 to 25 do begin
a:=a+i*i;
b:=i*i;
writeln('Сумма:',a,'(квадрат числа :',i,'=',b,')');
end;
write(a);
end.
1)
2*60=120 байт в строке
120*40=4800 байт на старнице
4800*1500= 7 200 000 байт=7.2 Мбайт во всей книге
2)
60*40=2400 байт
2400*150=360 000 байт =360 Кбайт=0.36 Мбайт
3)
128 Кбайт= 128 000 байт
128 000\ 2=64 000 символов
4)
1.5 Кбайт=1536 байт
1536*8=12288
12288\3072=4 бит
5)
в 1 Мбайте 1572864 байт
1572864\512=3072 байта=24 576 бит размер сообщения
24 576\2048=12 бит - размер одного символа
6)
8 бит = 1 байт
48*1=48 байт в строке
48*40=1920 байт в странице
1920*8= 15 360 байт в рассказе
15 360 байт= 15 Кбайт
Начало
Сними трубку
набери номер
дождись гудка
гудки длинные?
передай сообщение
дождись ответа
положи трубку
конец
в ромбе всегда стоит вопрос.