(к предыдущему ответу прибавляется по порядку идущее нечётное число)
Ответ дал: Гость
картинка длжна быть в папке с программой и быть в формате bmp
usesgraphabc;
varn: string; b: picture; s: integer;
beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.
Ответ дал: Гость
ток-кот=кто это 954-459=495. бра+бар=раб это 495+459=954
Ответ дал: Гость
program amoeba; var i,count: integer; begin i: =3; //количество часов count: =1; //количество амеб while i < = 24 do begin count: =count*2; //каждые 3 часа количество амеб удваивается writeln(i,' hours: ',count); //выводим кол-во часов и амеб i: =i+3; end; readln; end.
Популярные вопросы