Пользователь вводит с клавиатуры размер файла в мегаьайтах и объем карты памяти в гигабайтах. Объем файла нужно оуруглить до целого. Программа проверяет, можно ли записать данный файл на карту памяти, и выводит ответ на экран
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017 // Внимание! Если программа не работает, обновите версию!
1)
begin var (n,m):=ReadInteger2('Количество строк и столбцов в массиве:'); Writeln('*** Исходный массив [',n,',',m,'] ***'); var a:=MatrRandom(n,m,-99,99); a.Println(4); Writeln(4*a.ColCount*'-'); var b:=a.Rows.Select(r->r.Where(t->t.IsOdd).LastOrDefault); b.Println; end.
Техника безопасности при работе с компьютером очень важна, особенно если речь идет о школьных занятиях. Ведь современную образовательную систему трудно представить без компьютерных технологий. Кроме того, данная информация будет полезна и родителям. Техника безопасности при работе с компьютером Для начала стоит отметить важность защиты здоровья ребенка во время работы с электронной и вычислительной техникой. Кроме того, требования к образовательным учреждениям предусматривают и информационную безопасность ученика во время выхода в интернет.
Python:
a = float(input('Введите размер файла (в Мбайтах): '))
b = float(input('Введите объем карты памяти (в Гбайтах): '))
b *= 1024
if b / round(a) < 1:
print('Данный файл нельзя записать на карту памяти.')
else:
print('Данный файл можно записать на карту памяти.')
Pascal:
var
a, b: real;
begin
write('Введите размер файла (в Мбайтах): ');
readln(a);
write('Введите объем карты памяти (в Гбайтах): ');
readln(b);
b := b * 1024;
if (b / round(a)) < 1 then writeln('Данный файл нельзя записать на карту памяти.')
else writeln('Данный файл можно записать на карту памяти.');
end.