begin write('Введите число '); readln(a); writeln('Таблица деления числа ', a, ' на целые четные от 2 до 20 (с 2 знаками после запятой)'); i := 2; while i <= 20 do begin x := a / i; writeln(a, '/', i:2, '=', x:0:2); i := i + 2; end; end.
Тестовое решение: Введите число 27 Таблица деления числа 27 на целые четные от 2 до 20 (с 2 знаками после запятой) 27/ 2=13.50 27/ 4=6.75 27/ 6=4.50 27/ 8=3.38 27/10=2.70 27/12=2.25 27/14=1.93 27/16=1.69 27/18=1.50 27/20=1.35
информатика - это как правило наука о методах и процессах сбора, хранения информации. с информатики мы хорошо владеем компьютером и другими электронными и портативными приборами. с науки информатики мы можем работать с различными программами, например как: paint - программа по созданию рисунков, граффики и т.д., так-же имеются программы по созданию мультфиьмов, анимаций, презентаций и т.д. в заключении хочу сказать, что без этой науки мир развивался бы дольше!
Пополнение библиотеки первейшей своей обязанностью считали птолемеи. один из царей этой династии отказался продать голодавшим афинянам пшеницу, пока те не согласились передать в александрийскую библиотеку подлинные рукописи эсхила, софокла и еврипида, с тем, чтобы с них были сняты копии. однако птолемей предпочел потерять огромную сумму - 15 талантов, - оставленную у афинян в качестве залога, чем вернуть подлинники. в афины были возвращены только копии. правда, прекрасно выполненные, но - копии.
x, a: real;
i: integer;
begin
write('Введите число ');
readln(a);
writeln('Таблица деления числа ', a, ' на целые четные от 2 до 20 (с 2 знаками после запятой)');
i := 2;
while i <= 20 do
begin
x := a / i;
writeln(a, '/', i:2, '=', x:0:2);
i := i + 2;
end;
end.
Тестовое решение:
Введите число 27
Таблица деления числа 27 на целые четные от 2 до 20 (с 2 знаками после запятой)
27/ 2=13.50
27/ 4=6.75
27/ 6=4.50
27/ 8=3.38
27/10=2.70
27/12=2.25
27/14=1.93
27/16=1.69
27/18=1.50
27/20=1.35