Обычный срез. То, что буква C не меняется говорит о том, что в срезе 1 столбец. Цифры слева направо 1 и 3 - 3 строчки. Столбцы умножим на строчки и получим 3 ячейки.
Спасибо
Ответ дал: Гость
паскаль же?
var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin
d: =d+k;
val(s,k,err);
end;
write (d);
end.
Ответ дал: Гость
var m,r: real;
begin
writeln('вычисление расстояния между населенными пунктами.') ; writeln('ведите исходные данные: '); writeln('масштаб карты (количество километров в одном сантиметре) > ');
read(m); writeln('расстояние между двумя точками, изображающими населенные пункты (см) > ');
read(r); writeln('расстояние между населенными пунктами ', m*r,' км.');
Популярные вопросы