1. Программа "Анкета":
program anketa;
var a,b,d:string;
c:char;
begin
writeln('Введите ваши имя и фамилию в именительном падеже: ');
readln(a,b);
writeln('Введите букву класса: ');
readln(c);
writeln('Введите ваше хобби: ');
readln(d);
writeln('Меня зовут ',a,' ',b,';');
writeln('Я учусь в 7 "',c,'" классе гимназии 524;');
writeln('Моё хобби - ',d,';');
writeln('Периметр прямоугольника равен 30');
writeln('<span>Сегодня ярко светит солнце!</span>')
end.
2. Программа "Опросы":
program oprosy;
var a,b,c:integer;
d:real;
begin
writeln('Введите ваши оценки по пятибалльной шкале: ');
readln(a,b,c);
d:=(a+b+c)/3;
writeln('Ваша средняя оценка за тесты - ',d,'.');
end.
3. Программа "Периметр прямоугольника":
program perimetr;
var a,b,c:integer;
begin
writeln('Введите стороны прямоугольника: ');
readln(a,b);
c:=(a+b)*2;
writeln('Периметр прямоугольника = ',c,'.');
end.
Оперативная память : RAMRecovery Tool v1.7
Архиватор : WinRar
Антивирусная рограмма: Kaspersky
Коммуникационная программа: ICQ
Система программирования: Delphi
Текстовый редактор: WordPad
Графический редактор: mspaint
Редактор презентаций : ms power point
Электронные таблицы: excel
Электронное учебное издание(учебники , тренажер , энциклопедия...) : PHP and MySQL - Andy Harris
<span>Игра : GTA 5</span>
102400 * 2 = 204800 байт информации, 204800 * 8 (бит в байте) = 1638400 / 64 = 25600 бит / секунда
Язык Python
A = []
for i in range(7):
A.append(int(raw_input("Введите %s число"%(i+1,))))
print sorted(A, reverse=True)
