Program massa;var m, a: real; begin writeln('Введите массу.'); readln(m); writeln('Введите единицу измерения массы. 1 - килограмм, 2 - миллиграмм, 3 - грамм, 4 - тонна, 5 - центнер.'); readln(a); writeln('Введённое вами значение равно '); if a=1 then write(m, ' килограмм.'); if a=2 then write(m/1000000, ' килограмм.'); if a=3 then write(m/1000, ' килограмм.'); if a=4 then write(m*1000, ' килограмм.'); if a=5 then write(m*100, ' килограмм.'); end.
меее, немного с окончаниями напортачила, но если надо, то можно просто до кг сократить и всё будет ок
Если учитель скачал exe через ян. диск то антивирус или сам браузер через который он качает файл может блокировать файл, тем самым оставив коренные элементы программы но скачав сам exe.
Убедись что ничего не мешает скачке файла, может быть на компьютере не хватает памяти)
<span>ДАНО:2^30
НАЙТИ В МБАЙТАХ
</span><span>2^30/2^3/2^10/2^10=2^7=128</span>
Задача написана на Pascal
Program Zadacha;
Var pak, mas: real;
Begin
Writeln('Введите массу яблок');
Readln(mas); pak:=mas/3;
Writeln('Необходимо ',pak:4:2,' пакетов');
<span>End.</span>
Brain -<span> первый </span>компьютерный вирус<span> для </span>персонального компьютера<span> под управлением операционной системы </span>MS-DOS<span> и первый вирус, вызвавший глобальную эпидемию в </span>1986 году<span>. </span><span>
Чернобыль - компьютерный вирус, написанный тайваньским студентом Чэнь Инхао в июне 1998 года.
</span>Эпидемия вируса Melissa<span> началась 26 марта 1999 г. Тогда это был </span>вирус <span>нового типа. Он распространялся по электронной почте в присоединенном файле, и после того как пользователь открывал этот файл, </span>вирус<span> рассылал себя по первым 50 адресам в адресной книги почтовой программы Microsoft Outlook.</span>