//pascalabc.net var i: integer; begin for i: =1 to 9 do writeln(i,'*',i,'=',i*i); end.
Спасибо
Ответ дал: Гость
обычно 1 символ = 1 байт = 8 бит, если другое не оговаривается в условии следовательно:
14400 * 10 : 8 = 18000 символа
336600 * 10 * 8 = 420750 символа
Ответ дал: Гость
первая программа считает сумму входящих в строку цифр стоящих на местах с нечетными номерами, начиная с первой, если это буква то вместо нее берется 0(ноль)
результат выполнения
аб2в457где245*ж0247025020
2)
var s, r: string; i: integer;
begin readln(s); r : = ''; for i : = 1 to length(s) do if s[i] < > 'c' then r : = r + s[i]; writeln(r); end.
Популярные вопросы