Первый год - 1,2m
Второй - 1.44m
Третий - 1,728m
Четвертый - 2,0736m
Долг в 2 раза превысит первоначальный вклад через 4 года.
С помощью команд.
3
вперед (50)
Движение вперед на 50 шагов (точек экрана)
4
вправо (90)
Повернуть направо на 90º
5
влево (180)
Повернуть налево на 180º
назад (60)
Движение назад на 60 точек
Получилось на 15 мин быстрее)))
Как я понял, нужно определить, какая буква введена с клавиатуры - большая или маленькая, сделала для английского и русского языка
program one;
var
a:string;
begin
readln(a);
if a[1] in ['a'..'z'] then writeln('Маленькая');
if a[1] in ['A'..'Z'] then writeln('Большая');
if a[1] in ['а'..'я'] then writeln('Маленькая');
if a[1] in ['А'..'Я'] then writeln('Большая');
<span>end.</span>
program raf105;
var x,y:integer;
begin
writeln('Введите 2 числа');
readln(x,y);
if y<>0
then writeln(x,'/',y,'=',x/y)
else writeln('На ноль делить нельзя');
end.
<em>Написано на языке PascalABC.NET</em>
Транспортировка данных<span> – приём и передача данных между удаленными участниками информационного процесса.</span><span>
</span>